A064974 Numbers k such that k-1, k-3, k-7 and k-9 are all prime.

14, 20, 110, 200, 830, 1490, 1880, 2090, 3260, 3470, 5660, 9440, 13010, 15650, 15740, 16070, 18050, 18920, 19430, 21020, 22280, 25310, 31730, 34850, 43790, 51350, 55340, 62990, 67220, 69500, 72230, 77270, 79700, 81050, 82730, 88820

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. A090258.

Sequence in context: A015797 A293184 A368408 * A167335 A129244 A070719

Adjacent sequences: A064971 A064972 A064973 * A064975 A064976 A064977

Keyword

easy,nonn

Author

Robert G. Wilson v, Oct 30 2001

Status

approved