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

 


218780英镑
A014486号-Beanstalk树的紧凑表示的代码,从一个内部节点(1)和两个叶子(2和3)的树开始,一次增长两个自然数,较小的数字到达左手边。
6
2, 10, 44, 180, 728, 2928, 11720, 46888, 187568, 750304, 3001232, 12004960, 48019856, 192079504, 768318048, 3073272224, 12293088960, 49172355968, 196689423936, 786757695872, 3147030783552, 12588123134528, 50352492538240, 201409970153216, 805639880612992
抵消
1,1
评论
三角形的活动中间区域(参见随附的“Wolframesque”插图)对应于豆茎生长尖端所在的区域。该区域发生的连续较大的“湍流”大约出现在A218548型除以二。卷须越大(有限的侧枝树),在生长区域的方向上摇摆的时间越长,这种摇摆一直持续到无限茎的生长端(A179016号)已超过卷须的最顶端。另请参阅A218612型.
这些是按顺序排列的术语的镜像(在二叉树意义上)A218782号。有关较小的版本,请参阅A218776号&A218778号.
例子
说明生长中的豆茎树如何产生该序列的前四项。在这个“紧凑型”变体中,每对连续的数字((2,3)、(4,5)、(6,7)等)都会在豆茎上添加一个新芽(\/),较小的数字会出现在左边:
----------
..2...3...
...\./.... 编码人A014486号(A218781号(1)) =A014486号(1) =2(二进制10)。
....1.....
----------
....4...5.
.....\./..
..2...3...
...\./.... 编码人A014486号(A218781号(2)) =A014486号(2) =10(料箱1010)。
....1.....
----------
..6...7...
...\./....
....4...5.
.....\./..
..2...3...
...\./.... 编码人A014486号(A218781号(3)) =A014486号(5) = 44 (101100).
....1.....
----------
....8...9.
.....\./..
..6...7...
...\./....
....4...5.
.....\./..
..2...3...
...\./.... 编码人A014486号(A218781号(4)) =A014486号(12) = 180 (10110100).
....1.....
----------
因此,该序列的前四项是2、10、44和180。
黄体脂酮素
(带有记忆宏定义的方案安蒂·卡图恩的Intseg-library):
(定义(A218780型n) (括号->A014486号(树_用于_A218780型n) ))(定义(tree_for_A218780型n) (cond((零?n)(list))((=1n)(列表))(else(let((new-tree(copy-tree)(tree_for_218780英镑(-1+n)))))(为n--th-unbranching-tree-with-car-cdr-code添加-树!新树(A218791型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
作者
安蒂·卡图恩2012年11月17日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月21日09:30。包含376084个序列。(在oeis4上运行。)