%I#17 2022年10月30日18:19:59
%S 371992773679971049110314511709177721372213295330413407,
%电话:388939894091530971937883111131375715083160731709328643,
%电话:2890930259322033508935977408794215743451437774811951949
%A053782中出现的N个素数。
%H Chai Wah Wu,n的表,n的a(n)=1..10000</a>
%t s=0;lst={};Do[If[PrimeQ[n],NULL,s+=n;如果[PrimeQ[s],AppendTo[lst,s]],{n,2,7!}];第1页(*_Vladimir Joseph Stephan Orlovsky,2009年2月1日*)
%o(Python)
%o从python导入isprime
%o A053872_list,n,m,s=[],1,4,4
%o当len(A053872_list)<10000时:
%o如果是犯罪:
%o A053872_list.append(s)
%o m+=1
%o如果是质数(m):
%o m+=1
%o n+=1
%o s+=m#_查瓦乌,2018年5月13日
%o(PARI)列表a(nn)={my(s=0);对于复合(c=1,nn,s+=c;if(isprime(s),print1(s,“,”););}\\_Michel Marcus_,2018年5月13日
%Y参考A000040、A002808、A053782。
%K nonn公司
%O 1,1号机组
%A _G.L.Honaker,Jr.,2000年3月30日
%E来自Reiner Martin的更多条款,2001年7月17日