A082438 Palindromic primes with middle digit 2.

2, 727, 929, 30203, 36263, 37273, 39293, 70207, 72227, 73237, 93239, 96269, 1022201, 1062601, 1082801, 1092901, 1212121, 1242421, 1262621, 1362631, 1412141, 1422241, 1452541, 1532351, 1542451, 1572751, 1712171, 1802081

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..140

Mathematica

pp2Q[n_]:=Module[{idn=IntegerDigits[n], len}, len=Length[idn]; OddQ[len] && idn==Reverse[idn]&&idn[[Ceiling[len/2]]]==2]; Select[Prime[Range[ 140000]], pp2Q] (* Harvey P. Dale, Sep 29 2013 *)

Prog

(Magma) [ p: p in PrimesUpTo(200000000) | IsOdd(d) and D[(d+1) div 2] eq 2 and D eq Reverse(D) where d is #D where D is Intseq(p) ]; // Vincenzo Librandi, Apr 12 2011

Crossrefs

Cf. A002385.

Sequence in context: A167440 A156008 A103169 * A062066 A174368 A082621

Adjacent sequences: A082435 A082436 A082437 * A082439 A082440 A082441

Keyword

nonn,base

Author

Lekraj Beedassy, Apr 25 2003

Extensions

Corrected by David Wasserman, Sep 09 2004

Status

approved