A083393 Palindromes such that the sum of the digits is prime.
2, 3, 5, 7, 11, 101, 111, 131, 151, 191, 212, 232, 272, 292, 313, 353, 373, 434, 454, 494, 515, 535, 575, 595, 616, 656, 676, 737, 757, 797, 818, 838, 878, 919, 959, 1001, 10001, 10101, 10301, 10501, 10901, 11111, 11311, 11711, 11911, 12121, 12521, 12721
Offset: 1
Examples
12121 is a member because 1+2+1+2+1=7, 7 is prime.
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range[15000],PalindromeQ[#]&&PrimeQ[Total[IntegerDigits[#]]]&] (* Harvey P. Dale, Jul 17 2025 *)
Extensions
Corrected and extended by Jason Earls, Jun 12 2003
Comments