登录
A072092型
自同构car_robr_car引起的自然数置换!对由编码的括号执行操作A014486号.
6
0, 1, 3, 2, 7, 8, 4, 6, 5, 17, 18, 20, 21, 22, 9, 10, 14, 19, 16, 11, 12, 15, 13, 45, 46, 48, 49, 50, 54, 55, 57, 58, 59, 61, 62, 63, 64, 23, 24, 25, 26, 27, 37, 38, 51, 56, 60, 42, 44, 53, 47, 28, 29, 30, 31, 32, 39, 40, 43, 52, 33, 34, 35, 41, 36, 129, 130, 132, 133, 134
抵消
0,3
链接
A.卡图恩,异形性(包括计算该序列的完整Scheme程序)
黄体脂酮素
(在列表结构上实现此自同构的Scheme函数:)
(定义(car_robr_car!s)
(定义(robr!s)(let((ex-cdr(cdr s)))(set-cdr!s(caar s))(set-car!(car s)ex-cdr)(swap!(cars))
(定义(交换!s)(let((ex-car(car s)))(set-car!s(cdr s))(set-cdr!s ex-car)s))
交叉参考
关键词
非n
作者
安蒂·卡图恩2002年6月25日
状态
经核准的