%我#10 2024年2月24日11:04:40
%S 1,8,9,25,27,32112814472984186450415184403284106745369,
%电话:45387462084622536889439546886230694987,
%电话:1401602635449
%N幂(1)数(A001694),是不同阶乘的和。
%C工厂0!和1!不被认为是不同的。
%C a(27)>10^18(如果存在)_Amiram Eldar,2024年2月24日
%H<a href=“/index/Pow#powerful”>与强大数字相关的序列的索引条目</a>。
%e 6230694987=13+10!+8!+7!+4!+2!+1! = 3^3*11^2*1381^2.
%t pwfQ[n_]:=n==1||最小[Last/@因子整数@n] > 1; fac=范围[20]!;lst={};Do[n=Plus@@(fac*IntegerDigits[k,2,20]);如果[pwfQ[n],AppendTo[lst,n]],{k,2^20-1}];第一次试验
%tq[n_]:=模[{k=n,m=2,r,ans=True},而[{k,r}=商余数[k,m];k!=0||r!=0,如果[r>1,ans=False;中断[]];m++];ans];使用[{max=2^20-1},选择[Union[Flatten[Table[i^2*j^3,{j,1,max^(1/3)},{i,1,Sqrt[max/j^3]}]],q]](*_Amiram Eldar_,2024年2月24日*)
%A001694和A059590的Y交点。
%Y参考A025494、A115644、A115646、A089359。
%K nonn,更多
%O 1,2号机组
%A Giovanni Resta,2006年1月27日
|