A114271 Numbers k such that k^2 + 8 is prime.
3, 9, 15, 21, 33, 51, 57, 81, 87, 111, 117, 123, 129, 135, 141, 147, 153, 177, 189, 213, 219, 255, 279, 285, 315, 321, 327, 345, 351, 363, 399, 417, 465, 471, 477, 483, 495, 549, 579, 585, 627, 657, 663, 669, 723, 735, 741, 747, 759, 771, 783, 789, 807, 825
Offset: 1
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Mathematica
a={};Do[If[PrimeQ[n^2+8], AppendTo[a, n]], {n,0,10^3}]; a (* Vladimir Joseph Stephan Orlovsky, Apr 29 2008 *) Select[Range[1,901,2],PrimeQ[#^2+8]&] (* Harvey P. Dale, Aug 27 2023 *)
-
PARI
is(n)=isprime(n^2+8) \\ Charles R Greathouse IV, Jan 21 2015