登录
搜索: 编号:a354236
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A(n,k)是第n个数字m,因此从m开始的Collatz(或3x+1)轨迹正好包含k个奇数整数;正方形数组A(n,k),n>=1,k>=1。
+0
14
1, 5, 2, 3, 10, 4, 17, 6, 20, 8, 11, 34, 12, 21, 16, 7, 22, 35, 13, 40, 32, 9, 14, 23, 68, 24, 42, 64, 25, 18, 15, 44, 69, 26, 80, 128, 33, 49, 19, 28, 45, 70, 48, 84, 256, 43, 65, 50, 36, 29, 46, 75, 52, 85, 512, 57, 86, 66, 51, 37, 30, 88, 136, 53, 160, 1024
抵消
1,2
配方奶粉
A078719号(A(n,k))=k。
例子
方阵A(n,k)开始:
1, 5, 3, 17, 11, 7, 9, 25, 33, 43, ...
2, 10, 6, 34, 22, 14, 18, 49, 65, 86, ...
4, 20, 12, 35, 23, 15, 19, 50, 66, 87, ...
8, 21, 13, 68, 44, 28, 36, 51, 67, 89, ...
16, 40, 24, 69, 45, 29, 37, 98, 130, 172, ...
32, 42, 26, 70, 46, 30, 38, 99, 131, 173, ...
64, 80, 48, 75, 88, 56, 72, 100, 132, 174, ...
128, 84, 52, 136, 90, 58, 74, 101, 133, 177, ...
256, 85, 53, 138, 92, 60, 76, 102, 134, 178, ...
512, 160, 96, 140, 93, 61, 77, 196, 260, 179, ...
MAPLE公司
b: =proc(n)选项记忆;irem(n,2,‘r’)+
`if`(n=1,0,b(`if`(n::奇数,3*n+1,r))
结束时间:
A: =proc()局部h,p,q;p、 q:=proc()[]结束,0;
进程(n,k)
如果k=1,则返回2^(n-1)fi;
而nops(p(k))<n do q:=q+1;
h: =b(q);
p(h):=[p(h)[],q]
od;p(k)[n]
结束
结束():
seq(seq(A(n,1+d-n),n=1..d),d=1..12);
数学
b[n_]:=b[n]=模[{q,r},{q,r}=商余数[n,2];第页+
如果[n==1,0,b[If[OddQ[n],3*n+1,q]]];
A=模[{h,p,q},p[_]={};q=0;
函数[{n,k},如果[k==1,2^(n-1)];
当[长度[p[k]]<n时,q=q+1;
h=b[q];
p[h]=附加[p[h],q]];
p[k][[n]]];
表[表[A[n,1+d-n],{n,1,d}],{d,1,12}]//扁平(*Jean-François Alcover公司,2022年6月2日,之后阿洛伊斯·海因茨*)
关键词
非n,表格
作者
阿洛伊斯·海因茨2022年5月20日
状态
经核准的

搜索在0.004秒内完成