A085016 Prime(n) concatenated with Reverse(Prime(n)) (a palindrome) is divisible by n.

1, 7, 11, 59, 146, 319, 124243, 461867, 1446247, 4846042, 16146448, 19466227, 57973091, 73661929, 208574393, 681491953, 883910281, 1058487166, 1066657966, 1112633324

Offset

0,2

Links

Table of n, a(n) for n=0..19.

Example

146 is in the sequence since the 146th prime is 839 and 839938 is divisible by 146

Mathematica

i=IntegerDigits; c[x_] := FromDigits[Flatten[{i[x], Reverse[i[x]]}]]; Do[If[Mod[c[Prime[n]], n]==0, Print[n]], {n, 10^6}]

Crossrefs

Cf. A085017.

Sequence in context: A045462 A263231 A077411 * A067690 A358585 A196181

Adjacent sequences: A085013 A085014 A085015 * A085017 A085018 A085019

Keyword

base,nonn

Author

Giovanni Resta, Jun 18 2003

Status

approved