搜索: a082984-编号:a082994
|
|
A228014号
|
| 对Collatz序列长度大于k+1的k进行编号(计算x/2和3x+1步数)。 |
|
+10 2
|
|
|
3, 6, 7, 9, 11, 14, 15, 18, 19, 27, 31, 41, 47, 54, 55, 62, 63, 71, 73, 82, 83, 91, 94, 95, 97, 108, 109, 110
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
例子
|
a(1)是3,因为它的Collatz序列有八个步骤:3、10、5、16、8、4、2、1。
|
|
数学
|
选择[范围[1000],长度[排序规则[#]]>#+1&](*T.D.诺伊2013年8月20日*)
|
|
交叉参考
|
|
|
关键字
|
非n,更多
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A228060型
|
| 不规则的猜测数字表。设len(n)是n的Collatz(3x+1)迭代的长度(包括n)。数字n位于第n-len(n)行。 |
|
+10 1
|
|
|
27, 31, 41, 54, 47, 55, 62, 63, 73, 71, 82, 83, 97, 94, 9, 95, 7, 108, 3, 109, 11, 14, 110, 6, 15, 18, 19, 91, 5, 1, 2, 4, 25, 12, 10, 13, 8, 17, 39, 22, 33, 107, 23, 129, 28, 29, 16, 30, 20, 21, 24, 43, 36, 26, 37, 103, 124, 38, 125, 126, 34, 35, 49, 57, 50, 121
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
-85,1
|
|
评论
|
这个序列被称为推测序列,因为(我认为)我们目前无法知道是否有一些大n具有长的Collatz迭代。序列A220139年计算一些较大数字的轨迹,这些数字的长度都比较小(请参见A220140年). 下表显示了同一行中的数字。注意,每一行只有几个数字。第15行是第一行,有4个数字:26、37、103、124。第324行是第一行,有5个数字:336、357、370、414、440。第16028行有6个数字。第34937行有7个数字。前10^7行中没有超过7个数字的行。这个序列相当线性;在前10^7个术语中,没有相邻术语的差异超过547。
|
|
链接
|
|
|
例子
|
例子:
第85行:27
第76行:31
第-69:41行
第59行:54
第58行:47、55
第46行:62
第45行:63
第43行:73
第32行:71
第29行:82
第28行:83
第22行:97
第12行:94
第11行:9、95
第-10:7行
第6行:108
第5行:3、109
第4行:11、14、110
第3行:6、15、18
第2行:19、91
第1行:5
第0行:1,2
第1行:4、25
第2行:12
第3行:10、13
第4行:8、17、39
|
|
数学
|
nn=100;Collatz[n_]:=NestWhileList[If[EvenQ[#],#/2,3#+1]&,n,#>1&];t2=表格[{n-长度[Collatz[n]],n},{n,2*nn}];t3=选择[t2,#[[1]]<=nn&];转座[排序[t3]][[2]]
|
|
交叉参考
|
|
|
关键字
|
非n,标签
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 4, 8, 10, 12, 13, 16, 17, 20, 21, 22, 23, 24, 25, 26, 28, 29, 30, 32, 33, 34, 35, 36, 37, 38, 39, 40, 42, 43, 44, 45, 46, 48, 49, 50, 51, 52, 53, 56, 57, 58, 59, 60, 61, 64, 65, 66, 67, 68, 69, 70, 72, 74, 75, 76, 77, 78, 79, 80, 81, 84, 85, 86, 87, 88
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1、2
|
|
评论
|
|
|
链接
|
Chris K.Caldwell和G.L.Honaker,Jr。,5人的古玩
|
|
例子
|
在重复应用Collatz图的情况下,13的轨迹从13、40、20、10、5、16、8、4、2、1开始,需要9步才能达到1。9<13,所以13是序列的一个项。
|
|
数学
|
nsteps[n_]:=-1+长度@NestWhileList[If[OddQ[#],3#+1,#/2]&,n,#>1&];选择[范围[100],nsteps[#]<#&](*阿米拉姆·埃尔达尔2021年7月14日*)
|
|
黄体脂酮素
|
(PARI)a006370(n)=如果(n%2==0,n/2,3*n+1)
是(n)=我的(x=n,i=0);while(1,如果(x==1,如果(i<n,返回(1),返回(0)));x=a006370(x);i++)
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.005秒内完成
|