A164374 Numbers that are the sum of 2 distinct palindromic primes.
5, 7, 8, 9, 10, 12, 13, 14, 16, 18, 103, 104, 106, 108, 112, 133, 134, 136, 138, 142, 153, 154, 156, 158, 162, 183, 184, 186, 188, 192, 193, 194, 196, 198, 202, 232, 252, 282, 292, 312, 315, 316, 318, 320, 322, 324, 332, 342, 355, 356, 358, 360, 364, 372, 375, 376, 378
Offset: 1
Examples
a(1)=2+3=5. a(2)=2+5=7. a(3)=3+5=8. 11+191=202. 101+131=232.
Programs
-
Mathematica
Select[Range[400],Count[IntegerPartitions[#,{2}],?(AllTrue[#,PrimeQ]&&AllTrue[#,PalindromeQ]&&#[[1]]!=#[[2]]&)]>0&] (* _Harvey P. Dale, Jul 23 2025 *)
Extensions
Missing numbers inserted by R. J. Mathar, Aug 26 2009
Comments