A029973 Primes that are palindromic in base 5.
2, 3, 31, 41, 67, 83, 109, 701, 911, 1091, 1171, 1277, 1327, 1667, 1847, 2083, 2213, 2293, 2423, 2473, 2579, 2659, 2789, 2969, 3049, 16001, 16651, 19531, 20431, 21481, 23311, 23561, 24611, 25391, 26041, 27091, 28921, 30871, 31121
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,5][[1]]]==FromDigits[Reverse[RealDigits[n,5][[1]]]]; lst={}; Do[p=Prime[n]; If[f[p],AppendTo[lst,p]],{n,8!}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 10 2009 *)