%I#9 2024年2月2日09:05:09
%编号18,54,90108150162270300324450486540600630648750810972,
%电话:1050120013501458147015001620189019442100225024002430,
%电话:27002911629403000315032403750378038840504004374441045004800
%N A055932的成员,它们不是最小素数签名(参见A025487)。
%H Michael De Vlieger,n的表,n=1..10000的a(n)</a>
%F{a(n):n>=1}={A057335(A335485(k)):k>=1}.-_Peter Munn,2024年2月2日
%e18=2*3*3,所有素数因子都是连续素数,但最小素数签名是12=2*2*3;因此a(1)=18。
%t使用[{nn=4800},选择[Range[2,nn],And[#1!=Times@@MapIndexed[Prime[First@#2]^#1&,Sort[#3,Greater]],Last[#2]==Prime@Length[#2]]&@@Apply[Join,{{#1},Transpose@#2}]&@@{#,FactorInteger[#]}&]](*Michael De Vlieger_,2020年2月6日*)
%Y参考A025487、A055932、A057335、A335485。
%K容易,不是
%O 1,1号机组
%阿尔福德·阿诺尔德,2000年8月22日
%E更多来自Larry Reeves(larryr(AT)acm.org)的条款,2000年11月28日
|