A109209 Palindromic primes pp such that digit sum of pp as substring appears more than once in pp.

1123211, 1412141, 3228223, 3773773, 7949497, 9495949, 100161001, 101060101, 101141101, 110232011, 111050111, 112030211, 112111211, 113111311, 121111121, 122363221, 122444221, 125252521, 131030131, 131111131, 138313831, 138383831

Offset

1,1

Links

Table of n, a(n) for n=1..22.

Example

9495949 is OK because its digit sum 49 appears twice in 9495949.

Mathematica

bb={}; Do[id=IntegerDigits[p=Prime[n]]; If[StringCount[ToString[p], ToString[Plus@@id]]>1&&Reverse[id]==id, AppendTo[bb, p]], {n, 1000000}]; A109209=bb

Crossrefs

Cf. A052019 Sum of digits of prime p is substring of p, A109208 Palindromic primes pp such that digit sum of pp is its substring.

Sequence in context: A278932 A059767 A069583 * A340229 A100365 A363957

Adjacent sequences: A109206 A109207 A109208 * A109210 A109211 A109212

Keyword

base,nonn

Author

Zak Seidov, Jun 22 2005

Status

approved