%I#11 2017年5月20日11:31:49
%S 9240109201428015960117160193202079022440240243436024570,
%电话:2508026040265202964030360310803141632130344403511235880,
%电话:35910361203712838280386103860394804004040920414964250443470
%素数分解为pqrst^3的N个数。
%H T.D.Noe,n表,n=1..1000时的a(n)</a>
%H Will Nicholes,<a href=“http://willnicholes.com/math/primesiglist.htm“>主要签名</a>
%H<a href=“/index/Pri#prime_signature”>与素数签名相关的序列索引</a>
%t f[n_]:=排序[Last/@FactorInteger[n]]=={1,1,1,3};选择[范围[80000],f]
%o(PARI)列表(lim)=我的(v=列表(),t1,t2,t3,t4);对于素数(p=2,sqrtnint(lim\210,3),t1=p^3;对于素数(q=2,lim\(30*t1),如果(q==p,next);t2=q*t1;对于素数(r=2,lim\(6*t2),如果(r==p|r==q,next);t3=r*t2;对于素数(s=2,lim\(2*t3),如果(s==p|s==q|s==r,next);t4=s*t3;对于素数(t=2,lim\t4,如果(t==p|t==q|t==r|t==2,next);列表(v,t4*t)));Set(v)\\_Charles R Greathouse IV_,2016年8月25日
%Y参见A179667、A179693。
%K nonn公司
%O 1,1号机组
%A _弗拉迪米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基(Joseph Stephan Orlovsky),2011年5月3日
|