OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..2000
MATHEMATICA
Select[Table[FromDigits[Join[IntegerDigits[p], Reverse[Take[IntegerDigits[p], IntegerLength[p]-1]]]], {p, Prime[Range[5, 200]]}], PrimeQ] (* Harvey P. Dale, Mar 23 2024 *)
CROSSREFS
KEYWORD
base,nonn,easy
AUTHOR
Amarnath Murthy, Mar 02 2002
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), Jan 02 2003
STATUS
approved
