login
A064495
Prime(n^2) +/- n are primes.
0
30, 138, 960, 1056, 1278, 1470, 1968, 2538, 2730, 3030, 3570, 3810, 4122, 4248, 4350, 4506, 5568, 5586, 5718, 5856, 6156, 6486, 6570, 6942, 7194, 7260, 7380, 7410, 7422, 7584, 7920, 8034, 8304, 8910, 9180, 11340, 12684, 13260, 13380, 13620
OFFSET
1,1
EXAMPLE
30 is in the sequence because the thirtieth prime is 113. 113 +/- 30 = 83 and 143 both of which are primes.
MATHEMATICA
Select[ Range[15000], PrimeQ[ Prime[ #^2] + # ] && PrimeQ[ Prime[ #^2] - # ] &]
Select[Range[15000], And@@PrimeQ[Prime[#^2]+{#, -#}]&] (* Harvey P. Dale, May 27 2014 *)
CROSSREFS
Sequence in context: A117750 A348828 A158462 * A267904 A218407 A347222
KEYWORD
easy,nonn
AUTHOR
Robert G. Wilson v, Oct 04 2001
STATUS
approved