提出
经核准的
编辑
(PARI)isok(n)={my(f=因子(n));(n!=1)&&\\米歇尔·马库斯2019年3月19日
对于任意k>=2,设d是k的除数,使得d>A056239号(k) ●●●●。然后2^(d-A056239号(k) )*k在序列中。类似地,如果n个 k个 在d的序列中=A056239号(k) ,然后2^d*n个 k个 在序列中-罗伯特·伊斯雷尔2019年3月19日
对于任意k>=2,设d是k的除数,使得d>A056239号(k) ●●●●。然后2^(d-A056239号(k) )*k在序列中。类似地,如果n在与d的序列中=A056239号(k) ,则序列中为2^d*n-罗伯特·伊斯雷尔2019年3月19日
Robert Israel,<a href=“/A324851型/b324851.txt“>n、a(n)表,n=1..10000</a>
过滤器:=proc(n)局部t;n mod add(数字理论:-pi(t[1])*t[2],t=ifactors(n)[2])=0结束进程:
选择(过滤器,[1..1000]美元)#罗伯特·伊斯雷尔2019年3月19日