A139447 Numbers n such that primorial(n)/2 + 64 is prime.
2, 3, 8, 11, 94, 127, 201, 211, 257, 259, 392, 1305, 5234, 13013, 13679, 16866, 23879
Offset: 1
Keywords
Programs
-
Mathematica
k = 1/2; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k + 64], Print[n]; AppendTo[a, n]], {n, 325}]; a
Extensions
a(12) from Ray Chandler, Jun 16 2013
a(13)-a(17) from Robert Price, Mar 29 2017
Comments