%I#34 2022年5月24日17:53:22

%S 33,65,66，67130131132133134260261264266269273289，

%电话：520522524525528529532533535538546547555571577578579，

%电话：58363363510401044104510481050105610510591064107210761077

%在Collatz（或3x+1）轨迹中包含9个奇数的N个数字。

%如果x是偶数，Collatz（或3x+1）函数是f（x）=x/2，如果x是奇数，则是3x+1。

%C通过对n重复应用f，直到达到1，即可获得n的Collatz轨迹。

%C A078719（a（n））=9；A006667（a（n））=8。

%D J.Shallit和D.Wilson，“3x+1”问题和有限自动机，EATCS公报#46（1992），第182-185页。

%H Reinhard Zumkeller，n的表，n=1..10000的a（n）</a>

%H J.Shallit和D.Wilson，<a href=“网址：http://www.cs.uwaterloo.ca/~shallit/Papers/wilson.ps“>“3x+1”问题与有限自动机，EATCS公报第46期（1992年），第182-185页。

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/CollatzProblem.html“>Collatz问题</a>

%H维基百科，<a href=“http://en.wikipedia.org/wiki/Coraltz_conjecture“>科拉茨猜想</a>

%H<a href=“/index/3#3x1”>与3x+1（或Collatz）问题相关的序列的索引条目</a>

%H<a href=“/index/Ar#2-automatic”>为2-自动序列索引条目。

%e 33的Collatz轨迹是（33、100、50、25、76、38、19、58、29、88、44、22、11、34、17、52、26、13、40、20、10、5、16、8、4、2、1），包含9个奇数整数。

%t排序规则[n_]：=NestWhileList[If[EvenQ[#]，#/2，3#+1]&，n，#>1&]；countOdd[lst_]：=长度[Select[lst，OddQ]]；选择[Range[1000]，countOdd[Collatz[#]]==9&]（*_T.D.Noe_，2012年12月3日*）

%o（哈斯克尔）

%o导入数据。列表（元素索引）

%o a062059 n=a062059_列表！！（n-1）

%o a062059_list=映射（+1）$elemIndices 9 a078719_list

%o--_Reinhard Zumkeller_2011年10月8日

%o（Python）

%o定义a（n）：

%o l=[n，]

%o为True时：

%o如果n%2==0:n//=2

%o其他：n=3*n+1

%o如果n不在l中：

%o l+=[n，]

%o如果n<2：中断

%o其他：中断

%o返回len（如果i%2，则[i代表l中的i]）

%o如果a（n）==9]#_Indranil Ghosh，2017年4月14日

%Y参见A062052、A062053、A062024、A0620055、A062066、A0620.57、A062088、A0620060。

%A354236的Y列k=9。

%K nonn公司

%O 1,1号机组

%A·热心的W·威尔逊_