OFFSET
1,1
COMMENTS
Corresponding primes are in A045637.
MATHEMATICA
Select[Table[n, {n, 300}], PrimeQ[Prime[#]^2 + 4] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
XU Pingya, Jun 02 2017
STATUS
approved