A029979 Primes that are palindromic in base 12.

2, 3, 5, 7, 11, 13, 157, 181, 193, 229, 241, 277, 761, 773, 797, 809, 821, 857, 1039, 1051, 1063, 1087, 1123, 1607, 1619, 1667, 21169, 21313, 21601, 22621, 23053, 23197, 23629, 23773, 23917, 24061, 24793, 25657, 25801, 26821, 27109, 27253

Offset: 1

Author

Patrick De Geest

Keywords

• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000
• P. De Geest, World!Of Palindromic Primes

Programs

Mathematica

f[n_]:=FromDigits[RealDigits[n,12][[1]]]==FromDigits[Reverse[RealDigits[n,12][[1]]]]; lst={}; Do[p=Prime[n]; If[f[p],AppendTo[lst,p]],{n,8!}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 10 2009 *)
pal12Q[n_]:=Module[{idn=IntegerDigits[n,12]},idn==Reverse[idn]]; Select[ Prime[ Range[3000]],pal12Q] (* Harvey P. Dale, Sep 23 2016 *)