A109184 Palindromic primes with digit sum 20.
929, 16661, 17471, 36263, 70607, 72227, 73037, 91019, 1074701, 1082801, 1180811, 1262621, 1328231, 1360631, 1508051, 1532351, 1630361, 1712171, 1802081, 3160613, 3218123, 7014107, 7300037, 9002009, 102383201, 102707201, 103282301
Offset: 1
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..4732
Programs
-
Mathematica
Select[Prime[Range[5940000]],PalindromeQ[#]&&Total[IntegerDigits[#]]==20&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 19 2021 *)
Comments