OFFSET
1,1
LINKS
Patrick De Geest, World!Of Palindromic Primes
EXAMPLE
16561_10 = 66166_7. - Jon E. Schoenfield, Apr 10 2021
MATHEMATICA
Parallelize[Select[Prime[Range[650000]], AllTrue[{#, IntegerDigits[#, 7]}, PalindromeQ]&]] (* The program generates the first five terms of the sequence. *) (* Harvey P. Dale, Aug 10 2026 *)
CROSSREFS
KEYWORD
nonn,hard,base,more
AUTHOR
Patrick De Geest, Aug 15 1998
EXTENSIONS
a(7)-a(9) from Max Alekseyev, Nov 11 2025
STATUS
approved