OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
Eric Weisstein: Palindromic Prime.
MATHEMATICA
pal7Q[n_]:=Module[{idn7=IntegerDigits[n, 7]}, idn7==Reverse[idn7]]; FromDigits[ IntegerDigits[#, 7]]&/@Select[Prime[Range[1000]], pal7Q] (* Harvey P. Dale, Aug 21 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Martin Renner, Apr 13 2006
STATUS
approved