A029981 Primes that are palindromic in base 14.
2, 3, 5, 7, 11, 13, 197, 211, 239, 281, 337, 379, 619, 647, 661, 773, 1013, 1069, 1097, 1153, 1787, 1801, 1871, 1913, 2237, 2251, 2293, 2617, 2659, 2687, 2729, 39397, 41959, 42743, 43331, 43933, 44129, 45697, 45893, 46691, 47279, 48259
Offset: 1
Links
- John Cerkan, Table of n, a(n) for n = 1..10000
- P. De Geest, World!Of Palindromic Primes
Programs
-
Mathematica
f[n_]:=FromDigits[RealDigits[n,14][[1]]]==FromDigits[Reverse[RealDigits[n,14][[1]]]]; lst={}; Do[p=Prime[n]; If[f[p],AppendTo[lst,p]],{n,8!}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 10 2009 *)