登录
A214614型
按行读取的不规则三角形:第n行给出的数字<=n的Collatz轨迹包含n的轨迹。
2
1, 1, 2, 1, 2, 3, 1, 2, 4, 1, 2, 4, 5, 1, 2, 3, 4, 5, 6, 1, 2, 4, 5, 7, 1, 2, 4, 8, 1, 2, 4, 5, 7, 8, 9, 1, 2, 4, 5, 8, 10, 1, 2, 4, 5, 8, 10, 11, 1, 2, 3, 4, 5, 6, 8, 10, 12, 1, 2, 4, 5, 8, 10, 13, 1, 2, 4, 5, 7, 8, 10, 11, 13, 14, 1, 2, 4, 5, 8, 10, 15
抵消
1,3
评论
每行有A159999号(n) 元素和以n结尾。
例子
三角形行数:
{1},
{1, 2},
{1, 2, 3},
{1, 2, 4},
{1, 2, 4, 5},
{1, 2, 3, 4, 5, 6},
{1, 2, 4, 5, 7},
{1, 2, 4, 8},
{1, 2, 4, 5, 7, 8, 9},
{1, 2, 4, 5, 8, 10}
数学
Collatz[n_]:=NestWhileList[If[EvenQ[#],#/2,3#+1]&,n,#>1&];f[n_]:=模块[{c=Collatz[n]},选择[c,#<=n&]];t=表格[f[n],{n,20}];压扁[t](*T.D.诺伊2013年3月7日*)
黄体脂酮素
(哈斯克尔)
导入数据。列表(排序)
a214614 n k=a214614_tabf!!(n-1)(k-1)
a214614_row n=a214614 _ tabf!!(n-1)
a214614_tabf=zipWith f[1..]a070165_tabf,其中
f v ws=排序$过滤器(<=v)ws
关键词
非n,标签
作者
贾扬达·巴苏2013年3月6日
状态
经核准的