A046475 Primes that are palindromic in bases 6 and 10.
2, 3, 5, 7, 191, 108151801, 11271517211, 155259838952551
Offset: 1
Examples
191_10 = 515_6. - _Jon E. Schoenfield_, Apr 10 2021
Links
- P. De Geest, World!Of Palindromic Primes
Programs
-
Mathematica
pal6Q[p_]:=With[{idn6=IntegerDigits[p,6]},PalindromeQ[p]&&idn6==Reverse[idn6]]; Select[Prime[Range[63*10^5]],pal6Q] (* The program generates the first six terms of the sequence. *) (* Harvey P. Dale, Dec 04 2024 *)
Comments