|
|
A028882
|
|
Numbers k such that k^2 - 7 is prime.
|
|
6
|
|
|
3, 6, 12, 18, 24, 36, 48, 54, 60, 66, 90, 96, 108, 132, 138, 156, 162, 174, 186, 192, 204, 216, 222, 228, 240, 246, 270, 306, 318, 330, 360, 366, 384, 390, 408, 438, 450, 468, 474, 480, 492, 498, 522, 570, 576, 582, 606, 612, 618, 624, 636, 642, 660, 678, 708
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[3, 800], PrimeQ[#^2-7]&] (* Harvey P. Dale, Jul 21 2013 *)
|
|
PROG
|
(PARI) for(n=3, 1000, if(isprime(n^2-7), print1(n, ", "))) \\ Edward Jiang, Aug 06 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|