A076228-OEIS公司

A076228号

应用于n的Collatz函数轨迹中的项数k，使得k<n。

0, 1, 2, 2, 3, 5, 4, 3, 6, 5, 6, 8, 6, 9, 6, 4, 8, 13, 10, 7, 5, 11, 8, 10, 13, 9, 9, 15, 13, 10, 9, 5, 16, 11, 8, 19, 17, 16, 17, 8, 12, 7, 19, 15, 13, 11, 12, 11, 19, 20, 17, 11, 9, 17, 14, 19, 23, 18, 21, 15, 13, 16, 14, 6, 22, 24, 21, 14, 12, 11, 15, 22, 18, 21, 7, 21, 19, 25, 22, 9

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,3

人们认为，对于每个x，a（n）=x出现的次数是有限的，最大的n是2^x。

原名：Collatz-function的开始迭代(A006370美元)初始值为n.a（n）表示在定点列表期间，该值下降到初始值以下的次数，直到到达endpoint=1-迈克尔·德弗利格2018年12月13日

链接

迈克尔·德弗利格，n=1..10000时的n，a（n）表

与3x+1（或Collatz）问题相关的序列索引项

例子

A070165号(18) = {18, 9, 28, 14, 7, 22, 11, 34, 17, 52, 26, 13, 40, 20, 10, 5, 16, 8, 4, 2, 1}. a（18）=13，因为13项小于n=18；即：{9、14、7、11、17、13、10、5、16、8、4、2、1}。

数学

f[x_]：=（1-Mod[x，2]）*（x/2）+（Mod[x、2]）x（3*x+1）f[1]=1；f0[x_]：=删除[FixedPointList[f，x]，-1]f1[x_]:=f0[x]-部件[f0[x]，1]f2[x_〕：=计数[符号[f1[x]]，-1]表[f2[w]，{w，1，256}]

（*第二个节目：*）

表[Count[NestWhileList[If[EvenQ@#，#/2，3#+1]&，n，#>1&]，_？（#<n&）]，{n，80}](*迈克尔·德弗利格2018年12月9日*）

交叉参考

囊性纤维变性。A006370美元,A070165号,A074473号,A159999号.

上下文中的序列：A036014号 A359948型 A289507型*A317050型 A243970型 A282443号

相邻序列：A076225号 A076226号 A076227号*A076229号 A076230型 A076231号

关键字

非n

作者

拉博斯·埃利默2002年10月1日

状态

经核准的