编辑
经核准的
变体A025586号根据定义，考虑以1结尾的轨迹。因此，这两个序列不同 只是 对于在a（1）和a（2）-M.F.哈斯勒2019年10月20日
检验过的
提出
a[n]：=模[{r=n，m=n}，如果[n<=2，4，While[m>2，如果[OddQ[m]，m=3*m+1；如果[m>r，r=m]，m=m/2]]；r] ]；
表[a[n]，{n，1100}](*Jean-François Alcover公司2022年5月20日*）
a（6）)=) =16自迭代开始：6、3、10、5、16、8、4、2、1、4、2中、1。。。16为最高值.
a： =proc（n）选项记忆`如果`（n=1,4，
最大值（n，a（`if`（n:：偶数，n/2，3*n+1）））
结束时间：
seq（a（n），n=1..88）#阿洛伊斯·海因茨2021年10月16日
