登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A071658号 自同构cdr_robl_car!引起的自然数置换!操作由编码的括号A014486号. 8

%I#5 2014年4月30日01:53:47

%S 0,1,3,2,8,6,7,4,5,20,19,24,15,21,16,17,9,10,18,11,12,13,64,53,55,

%电话:51,52,54,60,62,37,38,61,39,40,41,57,56,63,42,43,58,44,45,23,24,46,25,

%U 26,27,59,47,48,28,29,49,30,31,32,50,33,34,35,36162191192154155单位

%N由自同构cdr_robl_car诱导的自然数置换!作用于A014486编码的括号。

%H A.Karttunen,<A href=“网址:http://www.iki.fi/~kartturi/matikka/Nekomorphisms/gatomorf.htm“>Gatomorphisms(包括计算此序列的完整Scheme源代码)

%H<a href=“/index/Per#IntegerPermutation”>自然数排列序列的索引项</a>

%o(Scheme函数在列表结构上实现此自同构:)

%o(定义(cdr_robl_car!s)(cond((not(pair?s)))((not-(pair)(cdr!s))(交换!s)

%o(定义(robl!s)(let(ex-car(cars)))(set-car!s(cddrs))(set-cdr!(cdr s)ex-car)(swap!(cdrs))

%o(定义(交换!s)(let((ex-car(cars)))(set-car!s(cdr-s))(set-cdr!s ex-car)s))

%Y逆置换:A071657及其car/cdr翻转共轭,即A071658(n)=A057163(A071657-A057163-(n))。另请参阅A071655、A071656、A0716509、A071660。

%K nonn公司

%0、3

%安蒂·卡图内恩,2002年5月30日

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新的seq。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年7月18日00:08 EDT。包含374377个序列。(在oeis4上运行。)