login
A030463
Previous palindromic prime concatenated with this palindromic prime is prime.
0
3, 32323, 33533, 37573, 38083, 79397, 1123211, 1126211, 1163611, 1180811, 1268621, 1276721, 1317131, 1338331, 1447441, 1550551, 1565651, 1609061, 1764671, 1829281, 1895981, 3236323, 3563653, 3627263, 7065607, 7087807
OFFSET
0,1
MATHEMATICA
palQ[n_]:=Module[{idn=IntegerDigits[n]}, idn==Reverse[idn]]; Transpose[ Select[ Partition[Select[Prime[Range[500000]], palQ], 2, 1], PrimeQ[ FromDigits[ Flatten[IntegerDigits/@#]]]&]][[2]] (* Harvey P. Dale, Dec 25 2012 *)
CROSSREFS
Sequence in context: A003839 A297023 A175875 * A086509 A068161 A116313
KEYWORD
nonn,base
STATUS
approved