A222116 Palindromic primes whose sum of digits is also a palindromic prime.

2, 3, 5, 7, 11, 101, 131, 151, 191, 313, 353, 10301, 10501, 11311, 13331, 30103, 1003001, 1123211, 1201021, 1221221, 1303031, 1311131, 3001003, 3103013, 100030001, 100050001, 100111001, 100131001, 101030101, 110111011, 110232011, 111010111, 111050111

Offset: 1

Author

Jayanta Basu, May 13 2013

Keywords

• nonn
• base

Examples

			353, a palindromic prime, is in the list since 3+5+3=11 is also a palindromic prime.
		

Links

• Giovanni Resta, Table of n, a(n) for n = 1..1000

Crossrefs

Intersection of A082806 and A082208.

Programs

Mathematica

palQ[n_]:=FromDigits[Reverse[IntegerDigits[n]]]==n; t={}; Do[If[palQ[p=Prime[n]] && palQ[td=Total[IntegerDigits[p]]] && PrimeQ[td],AppendTo[t,p]],{n,6400000}]; t