搜索: a072092-编号:a072093
|
|
|
|
0, 1, 3, 2, 7, 8, 4, 5, 6, 17, 18, 20, 21, 22, 9, 10, 11, 12, 13, 14, 15, 16, 19, 45, 46, 48, 49, 50, 54, 55, 57, 58, 59, 61, 62, 63, 64, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 47, 51, 52, 53, 56, 60, 129, 130, 132, 133, 134
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
评论
|
此自同构对未标记的有根平面二叉树(字母A、B、C表示位于这些节点上的任意子树,()表示隐含的终端节点)上的以下变换产生影响
A……B…………..B……C
.\./................\./
..x..C.-->…..A…..x…………..()..B……..B.()
...\./............\./..................\./...-->...\./.
……x…………..x…….x。。
(a、b)。c) ->(a、(b、c))____()。b) -->(b、())
也就是说,如果可能的话,我们将二叉树向右旋转,否则(如果树的左手边是终端节点)交换左右子树(这样终端节点就结束于右手边),即应用自同构*A069770号。请看中的示例A069770号看看这将如何生成给定的整数序列。
|
|
参考文献
|
A.Karttunen,正在准备论文,可通过电子邮件获取草稿。
|
|
链接
|
|
|
黄体脂酮素
|
(此自同构的方案实现。这些作用于S表达式,即列表结构:)
(构造版本:)(定义(*A074680号s) (cond((非(配对))s)((配对(汽车)))(cons(汽车)
(破坏性版本:)(定义(*A074680号! s) (条件((对)(条件(对(车))(机器人))(其他(交换!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))
|
|
交叉参考
|
这种自同构有几个变体,其中第一个子句是相同的(如果可能的话,将二叉树向右旋转),但如果左手边是空的,则会执行其他操作(不仅仅是交换边):A082336号,A082350型,A123500个,A123696号。以下自同构可以从该自同构递归导出:A057501号,A074682号,A074684号,A074686号,A074688号,A074689号,A089866号,A120705号,A122322号,A122331号。另见一些类似的:A069774号,A071659号,A071655号,A071657号,A072090型,A072094号,A072092型.
|
|
关键词
|
非n
|
|
作者
|
安蒂·卡图恩2002年9月11日,描述于2006年10月10日澄清。
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 3, 2, 7, 8, 4, 5, 6, 17, 18, 20, 21, 22, 10, 9, 11, 12, 13, 14, 15, 19, 16, 45, 46, 48, 49, 50, 54, 55, 57, 58, 59, 61, 62, 63, 64, 26, 27, 23, 24, 25, 29, 28, 30, 31, 32, 33, 34, 35, 36, 38, 37, 39, 40, 41, 51, 52, 56, 60, 42, 43, 44, 47, 53, 129, 130, 132, 133, 134
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
链接
|
A.卡图恩,异形性(包括计算该序列的完整Scheme程序)
|
|
黄体脂酮素
|
(在列表结构上实现此自同构的Scheme函数:)
(定义(cdr_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
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 3, 2, 6, 7, 8, 4, 5, 15, 14, 16, 17, 18, 19, 20, 22, 9, 10, 21, 11, 12, 13, 39, 40, 41, 37, 38, 43, 42, 44, 45, 46, 47, 48, 49, 50, 52, 51, 53, 54, 55, 60, 61, 62, 23, 24, 63, 25, 26, 27, 56, 57, 64, 28, 29, 58, 30, 31, 32, 59, 33, 34, 35, 36, 113, 112, 114, 115, 116
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
链接
|
A.卡图恩,异形性(包括计算该序列的完整Scheme程序)
|
|
黄体脂酮素
|
(在列表结构上实现此自同构的Scheme函数:)
(定义(car_roble_cdr!s)(cond((not(pair?s)))
(定义(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))
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 3, 2, 7, 6, 8, 4, 5, 17, 16, 18, 15, 14, 20, 19, 21, 9, 10, 22, 11, 12, 13, 45, 44, 46, 42, 43, 48, 47, 49, 40, 39, 50, 41, 37, 38, 54, 53, 55, 52, 51, 57, 56, 58, 23, 24, 59, 25, 26, 27, 61, 60, 62, 28, 29, 63, 30, 31, 32, 64, 33, 34, 35, 36, 129, 128, 130, 127, 126
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
链接
|
A.卡图恩,异形性(包括计算该序列的完整Scheme程序)
|
|
黄体脂酮素
|
(在列表结构上实现此自同构的Scheme函数:)
(定义(cdr_robl_cdr!s)(条件((非(配对)))(非(对?(cdr!s)))
(定义(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))
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 3, 2, 6, 8, 7, 4, 5, 14, 15, 19, 20, 22, 16, 21, 18, 9, 10, 17, 11, 12, 13, 37, 38, 39, 40, 41, 51, 52, 53, 54, 55, 60, 61, 62, 64, 42, 43, 56, 57, 63, 47, 58, 48, 23, 24, 50, 25, 26, 27, 44, 59, 49, 28, 29, 45, 30, 31, 32, 46, 33, 34, 35, 36, 107, 108, 109, 110, 111
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
链接
|
A.卡图恩,异形性(包括计算该序列的完整Scheme程序)
|
|
黄体脂酮素
|
(在列表结构上实现此自同构的Scheme函数:)
(定义(car_roble_car!s)(cond((not(pair?s)))
(定义(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))
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|