A064965 1000000n+1, 1000000n+3, 1000000n+7, 1000000n+9 are all primes.

14311, 14659, 23299, 40861, 43303, 46405, 62239, 67327, 77071, 94237, 102796, 115201, 120220, 134968, 138721, 152980, 252715, 260947, 272365, 274534, 285244, 298342, 304489, 305713, 311032, 318802, 324025, 325321, 338908, 343885, 352621

Offset

1,1

Links

Table of n, a(n) for n=1..31.

Mathematica

Select[Range[10^6/2], PrimeQ[10^6# + 1] && PrimeQ[10^6# + 3] && PrimeQ[10^6# + 7] && PrimeQ[10^6# + 9] &]
Select[Range[400000], AllTrue[10^6*#+{1, 3, 7, 9}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Mar 11 2015 *)

Crossrefs

Cf. A007811 and A064687.

Sequence in context: A233889 A115554 A106726 * A072890 A249314 A249207

Adjacent sequences: A064962 A064963 A064964 * A064966 A064967 A064968

Keyword

nonn

Author

Robert G. Wilson v, Oct 29 2001

Status

approved