A064962 Numbers k such that 1000k+1, 1000k+3, 1000k+7, 1000k+9 are all primes.

13, 1447, 2062, 5527, 6760, 8062, 11554, 11890, 14467, 23113, 23482, 24952, 25150, 28201, 28300, 31072, 31576, 36217, 41584, 41599, 45331, 50635, 56914, 66688, 67639, 69376, 75079, 80002, 81157, 82240, 84517, 88948, 90010, 90376, 91018

Offset

1,1

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[10^5], PrimeQ[1000# + 1] && PrimeQ[1000# + 3] && PrimeQ[1000# + 7] && PrimeQ[1000# + 9] &]

Prog

(PARI) { n=0; for (m=1, 10^9, if(isprime(1000*m + 1) && isprime(1000*m + 3) && isprime(1000*m + 7) && isprime(1000*m + 9), write("b064962.txt", n++, " ", m); if (n==1000, return)) ) } \\ Harry J. Smith, Oct 01 2009

Crossrefs

Cf. A007811, A064687.

Sequence in context: A350305 A197097 A353030 * A242562 A201357 A220551

Adjacent sequences: A064959 A064960 A064961 * A064963 A064964 A064965

Keyword

nonn

Author

Robert G. Wilson v, Oct 29 2001

Status

approved