%I#13 2017年11月18日21:00:26
%S 1,1,3,3,5,3,7,7,7,7,7,13,7,15,15,17,19,15,21,7,23,15,25,26,27,28,
%电话:29,15,31,31,38,31,328,31,28,37,31,51,31,81,38,43,28,31,41,31,49,51,
%U 31,53,31,31,31.31,57,31,51,31,61,61,31,63,63,65,28,67,63,31,31、31,71、31,73、74
%N函数A062402(x)=sigma(phi(x))被迭代。从n开始,a(n)是轨迹中出现的最小项,无论是在瞬态循环中还是在终端循环中。
%H Antti Karttunen,n的表格,n=1..16384的a(n)</a>
%e n=240:列表={240127312,[252195],252,…},a(240)=127,瞬态;
%e n=254:列表={254312,[252195],252,…},a(254)=195,一个循环项。
%t gf[x_]:=DivisorSigma[1,EulerPhi[x]]gite[x_,hos_]:=NestList[gf,x,hos]表[Min[gite[w,20]],{w,1,256}]
%o(方案)(定义(A096866 n)(let loop(已访问(列表n))(m n))_Antti Karttunen,2017年11月18日
%Y参见A062401、A062402、A096862、A0996863、A096840(最大期限)、A096993。
%Y参见A096865。
%K nonn公司
%氧1,3
%A _Labos Elemer,2004年7月21日
|