A071606 Smallest zero-free palindromic prime of 2n + 1 digits.

2, 131, 11311, 1114111, 111181111, 11112721111, 1111118111111, 111111151111111, 11111112521111111, 1111111111111111111, 111111111161111111111, 11111111111111111111111

Offset

0,1

Links

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

Mathematica

a[n_] := Block[{k = (10^(n + 1) - 1)/9}, While[m = FromDigits[ Join[ IntegerDigits[k], Reverse[ Drop[ IntegerDigits[k], -1]]]]; !PrimeQ[m], k++ ]; m]; Table[ a[n], {n, 0, 13}]

Crossrefs

Cf. A028989.

Sequence in context: A125633 A089662 A119778 * A080282 A131931 A020524

Adjacent sequences: A071603 A071604 A071605 * A071607 A071608 A071609

Keyword

nonn,base

Author

Lekraj Beedassy, Jun 21 2002

Extensions

Edited by Robert G. Wilson v, Jun 21 2002

Status

approved