%I#28 2023年8月6日11:15:07
%S 4,4,16,4,16,52,8,52,16,52,16,55,16,52,52,88,64,52160,
%电话24,88,409232,52,881609232,32100,52160,52112,88304,409232.64,
%U 196,521361609232,48148,88232,521609232,56196,88304160184
%N在函数m->m/2的重复迭代中,如果m偶数,m->3m+1如果m奇数,a(N)是从N开始时获得的最大值。
%C如果存在(n)(这是“3x+1”问题的本质),那么a(n)必须是4的倍数,因为如果a(n。
%C变量A025586根据定义考虑以1结尾的轨迹。因此,这两个序列仅在a(1)和a(2)处有所不同_M.F.Hasler,2019年10月20日
%H<a href=“/index/3#3x1”>与3x+1(或Collatz)问题相关的序列的索引条目</a>
%e a(6)=16,因为迭代开始:6,3,10,5,16,8,4,2,1,4,2,1。。。16是最高值。
%p a:=proc(n)选项记忆`如果`(n=1,4,
%p最大值(n,a(`if`(n::偶数,n/2,3*n+1)))
%p端:
%p序列(a(n),n=1..88);#_阿洛伊斯·海因茨,2021年10月16日
%t 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] ];
%t表[a[n],{n,1100}](*_Jean-François Alcover_,2022年5月20日*)
%o(PARI)a(n)=我的(r=最大值(4,n));而(n>2,如果(n%2,n=3*n+1;如果(n>r,r=n),n/=2));2011年7月19日,查尔斯·格里特豪斯四世
%Y参考A006370、A056957和A056958。
%Y基本上与A025586相同。
%K nonn公司
%O 1,1号机组
%2000年7月18日,安里·波托姆利
|