登录
A199637号
最小奇数k,以便在k的Collatz序列中有n个偶数。
2
5, 3, 21, 13, 85, 17, 11, 7, 15, 9, 19, 37, 25, 49, 33, 65, 43, 87, 57, 39, 79, 153, 105, 203, 135, 271, 185, 123, 247, 169, 329, 219, 159, 295, 569, 379, 283, 505, 377, 251, 167, 111, 223, 445, 297, 593, 395, 263, 175, 351, 233, 155, 103, 207, 137, 91, 183
抵消
4,1
评论
曾用名是:三角形第n行的第一个数字A199636号.
链接
Robert G.Wilson v,n=4..573时的n、a(n)表(T.D.Noe的前500个术语)
数学
Collatz[n_]:=NestWhileList[If[EvenQ[#],#/2,3#+1]&,n,#>1&];nn=100;t=表[0,{nn}];碳纳米管=3;n=1;而[cnt<nn,n=n+2;len=Length[Select[Collatz[n],EvenQ]];如果[len<=nn&&t[[len]]==0,t[[len]]=n;cnt++]];
f=编译[{{n,_Real}},块[{c=0,k=n},当[k>1,c++;如果[OddQ@Round@k,k=(3k+1)/2,k/=2]];c] ];k=1;t[_]:=0;当[k<2101时,如果[t@f@k==0,t@f@k=k;];k+=2];t@#&/@范围@100(*罗伯特·威尔逊v2018年3月6日*)
关键词
非n
作者
T.D.诺伊2011年11月14日
扩展
来自的新名称罗伯特·威尔逊v,2018年3月6日
状态
经核准的