login
A085017
Reverse(Prime(n)) concatenated with Prime(n) (a palindrome) is divisible by n.
1
1, 11, 189211, 219131, 3912073, 251088329, 4281405931, 5613526973
OFFSET
0,2
EXAMPLE
189211 is in the sequence since the 189211st prime is 2590087 and 78009522590087 is divisible by 189211
MATHEMATICA
i=IntegerDigits; c[x_] := FromDigits[Flatten[{Reverse[i[x]], i[x]}]]; Do[If[Mod[c[Prime[n]], n]==0, Print[n]], {n, 10^6}]
CROSSREFS
Cf. A085016.
Sequence in context: A201249 A144837 A324267 * A239203 A098880 A076173
KEYWORD
base,nonn
AUTHOR
Giovanni Resta, Jun 18 2003
STATUS
approved