A227892 Smaller of two consecutive palindromic primes whose product of digits is equal and nonzero.
191, 1129211, 3218123, 7129217, 7718177, 125292521, 146181641, 171292171, 197292791, 198292891, 316141613, 325383523, 359292953, 767292767, 773181377, 777494777, 929292929, 946141649, 983181389, 992181299, 11222922211, 11584948511, 11942924911, 11991819911
Offset: 1
Examples
191 is in the sequence because 191 and 313 are consecutive palindromic primes and the product of the digits of each = 9.
Links
- Shyam Sunder Gupta, Table of n, a(n) for n = 1..5000
Programs
-
Mathematica
Select[Partition[Select[Prime[Range[542*10^6]],PalindromeQ],2,1],Times @@ IntegerDigits[ #[[1]]] ==Times@@IntegerDigits[#[[2]]]>0&][[All,1]] (* Harvey P. Dale, Dec 23 2022 *)