登录

提醒:OEIS正在聘请一名新的总编辑,申请截止日期为1月26日。

A071656号
自同构car_cdr_roble引起的自然数置换!操作由编码的括号A014486号.
9
0, 1, 3, 2, 7, 6, 8, 4, 5, 17, 16, 18, 14, 15, 20, 19, 22, 9, 10, 21, 11, 12, 13, 45, 44, 46, 42, 43, 48, 47, 50, 37, 38, 49, 39, 40, 41, 54, 53, 55, 51, 52, 61, 60, 63, 23, 24, 62, 25, 26, 27, 57, 56, 64, 28, 29, 58, 30, 31, 32, 59, 33, 34, 35, 36, 129, 128, 130, 126, 127
抵消
0,3
链接
A.卡图恩,异形性(包括计算此序列的完整方案源代码)
黄体脂酮素
(在列表结构上实现此自同构的Scheme函数:)
(定义(car_cdr_robl!s)(cond((not(pair?s)))((not(pairs?(cdrs)))
(定义(robl!s)(let((ex-car(cars)))(set-car!s(cddrs))(set-cdr!(cdr s)ex-car)(swap!(cdrs))
(定义(交换!s)(let((ex-car(car s)))(set-car!s(cdr s))(set-cdr!s ex-car)s))
交叉参考
逆置换:A071655美元.car/cdr翻转的共轭A071659号,即。A071656号(n)=A057163号(A071659号(A057163号(n) )。另请参阅A071657号,A071658号.
关键词
非n
作者
安蒂·卡图恩2002年5月30日
状态
经核准的