%I#25 2022年9月8日08:44:36

%S 97292146,73220110,55166,83250125376188,94,47142,71214107，

%电话：322161484242121364182，912741374122061033115466233，

%电话：7003501755262637903951186593178089044513366683341675022517543771132566283850425

%N 3x+1序列从97开始。

%D R.K.Guy，《数论中未解决的问题》，E16。

%H T.D.Noe，n表，n=0..118的a（n）</a>

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

%pf:=proc（n）选项记忆；如果n=0，则为97；elif（n-1）mod 2=0，然后f（n-1）/2，否则3*f（n-l）+1；fi；结束；

%t NestList[If[EvenQ[#]，#/2，3#+1]&，97，100]（*Vincenzo Librandi_，2014年7月29日*）

%o（哈斯克尔）

%o a008873 n=a008873_列表！！n个

%o a008873_list=97：迭代a006370 97

%o——Reinhard Zumkeller，2012年8月30日

%o（Magma）[n eq 1 select 97 else IsOdd（Self（n-1））select 3*Self_文森佐·利班迪（Vincenzo Librandi），2014年7月29日

%Y参考A006370。

%A347270的Y行97。

%K nonn公司

%0、1

%A·N·J·A·斯隆。

%E更多来自Larry Reeves（larryr（AT）acm.org）的术语，2001年4月27日