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

%I #4 Mar 30 2012 17:40:33

%S 1,11,189211,219131,3912073,251088329,4281405931,5613526973

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

%e 189211 is in the sequence since the 189211st prime is 2590087 and 78009522590087 is divisible by 189211

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

%Y Cf. A085016.

%K base,nonn

%O 0,2

%A _Giovanni Resta_, Jun 18 2003