|
|
A229879
|
|
Palindromic prime numbers == 5 (mod 9).
|
|
1
|
|
|
5, 131, 383, 797, 10301, 12821, 16061, 19391, 30803, 32423, 35753, 36563, 38183, 76667, 77477, 79997, 94649, 96269, 1003001, 1028201, 1085801, 1093901, 1126211, 1134311, 1150511, 1175711, 1183811, 1208021, 1257521, 1273721, 1281821, 1363631, 1371731, 1412141
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
t = {}; Do[z = n*10^(IntegerLength[n] - 1) + FromDigits@Rest@Reverse@IntegerDigits[n]; If[PrimeQ[z] && Mod[z, 9] == 5, AppendTo[t, z]], {n, 1, 99999}]; t
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,less
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|