搜索: 编号:a218782
|
|
218782年
|
|
A014486号-Beanstalk-tree的紧凑表示代码,从一个内部节点(1)和两个叶子(3和2)的树开始,一次按两个自然数增长,较大的数字位于左侧。 |
|
+0 6
|
|
|
2, 12, 52, 216, 872, 3496, 14024, 56200, 224904, 899720, 3599496, 14398600, 57599112, 230398088, 921606280, 3686471816, 14745933960, 58983782536, 235935438984, 943742064776, 3774970665096, 15099883493512, 60399541098632, 241598171519112, 966392760309896
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
三角形的活动中间区域(见随附的“Wolframesque”插图)对应于豆茎生长尖端所在的区域。该区域发生的连续较大的“湍流”大约出现在A218548型除以二。卷须越大(有限的侧枝树),在生长区域的方向上摇摆的时间越长,这种摇摆一直持续到无限茎的生长端(A179016号)已超过卷须的最顶端。另请参阅A218612型.
|
|
链接
|
|
|
例子
|
说明正在生长的豆茎树如何产生此序列的前四项。在这个“紧凑型”变体中,每一对连续的数字((2,3)、(4,5)、(6,7)等)都会在豆茎上添加一个新芽(\/),而较小的数字会出现在右边:
----------
..3...2...
....1.....
----------
5...4.....
.\./......
..3...2...
....1.....
----------
..7...6...
...\./....
5...4.....
.\./......
..3...2...
....1.....
----------
9...8.....
.\./......
..7...6...
...\./....
5...4.....
.\./......
..3...2...
....1.....
----------
因此,该序列的前四项是2、12、52和216。
|
|
黄体脂酮素
|
(带有记忆宏定义的方案安蒂·卡图恩的Intseg-library):
(定义(tree_for_A218782号n) (cond((零?n)(list))((=1n)(列表))(else(let((new-tree(copy-tree)(tree_for_A218782号(-1+n)))(add-bud-for-the-n-th-unbanching-tree-with-car-cdr-code!new-tree(A218790型n) ))
(定义(add-bud-for-the-n-th-unbanching-tree-with-car-cdr-code!tree n)(let循环((n n)(t树)))
(定义(copy-tree bt)(cond((not(pair?bt))bt),(其他(cons(copy-tree(car-bt))))
(定义(括号->a014486 p)(let loop(s 0)(p p))(如果(null?p)s(let*((x(括号->a 014486(car p)))(w(箱宽x)))
(定义(箱宽n)(让回路(n n)(i 0))(如果(零?n)i(回路(地板->精确(/n 2))(1+i)));;(料箱宽度n)=A029837号(n+1)。
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|