%I#18 2022年9月8日08:45:04
%S 1,2,4,8,12,14,22,30,36,38,44,50,54,60,66,74,78,84,90,96106134144,
%电话156162168180188216222224234260264272308324336344366,
%电话:3683743783904024064224664684792498502516604624636
%N数N,使N^2+素数(N)是素数。
%H Harry J.Smith,n表,n=1..1000的a(n)</a>
%e2在序列中,因为2^2+素数(2)=4+3=7是素数。
%t选择[Range[1000],PrimeQ[#^2+Prime[#]]&]
%o(PARI){n=0;对于(m=1,10^9,如果(isprime(m^2+prime(m)),写入(“b064711.txt”,n++,“”,m);如果(n=1000,break))}\\_Harry J.Smith,2009年9月23日
%o(岩浆)[1..700]|IsPrime(n^2+NthPrime(n))];//_Klaus Brockhaus,2011年4月12日
%Y参考A004232,A184935。
%K容易,不是
%O 1,2号机组
%A _Robert G.Wilson v_,2001年10月13日
|