%I#12 2023年9月27日12:54:43
%S 1,2,4,6,12,30,36,42,7224042060090015601764360060848100,
%电话:46440174400406224035814240
%N对所有整数k>=1的N进行整数N的四舍五入(N^(1/k))除N。
%C 10^16以下没有其他条款。
%这是一个有限序列吗?
%t为A[n]:=
%t块[{t},
%t对于[k=2,(t=楼层[1/2+n^(1/k)])>=2,k++,
%t如果[Mod[n,t]!=0,返回[False]]];返回[True]]
%t选择[范围[1100000],isA[#]&](*_Julien Kluge_,2016年4月4日*)
%o(PARI){isA261341(n)=我的(k,t);k=2;直到(t<=2,t=圆(sqrtn(n,k));如果(n%t,返回(0));k++);1;}
%Y参考A261205、A261206
%Y A006446和A261342的子序列。
%K nonn,更多
%O 1,2号机组
%2015年8月15日Alekseyev最大值
|