OFFSET
1,4
MATHEMATICA
Round[Select[Table[Prime[n] + 1, {n, 314}], PrimeQ[ # + 1] &]/10] (* James C. McMahon, Oct 05 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Greg Huber, Jul 18 2006
STATUS
approved