This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A109185 #11 Dec 18 2015 11:15:28 %S A109185 97879,98689,1878781,1968691,1976791,1984891,3768673,3784873,3792973, %T A109185 3858583,3948493,3964693,7278727,7392937,7466647,7564657,7654567, %U A109185 7662667,7850587,7916197,9078709,9446449,9470749,9626269,9634369 %N A109185 Palindromic primes with digit sum = 40. %C A109185 Cf. A070250 Palindromic primes with digit sum = 10, A107579 Primes with digit sum = 10, A106760 Primes with digit sum = 20, A109184 Palindromic primes with digit sum = 20, A109207 Palindromic primes with digit sum = 50. %H A109185 Chai Wah Wu, <a href="/A109185/b109185.txt">Table of n, a(n) for n = 1..7791</a> %t A109185 Select[Prime@ Range[9000, 10^6], And[# == Reverse@ #, Total@ # == 40] &@ IntegerDigits@ # &] (* _Michael De Vlieger_, Dec 18 2015 *) %o A109185 (PARI) isok(n) = isprime(n) && (d=digits(n)) && (Vecrev(d)==d) && (sumdigits(n)==40); \\ _Michel Marcus_, Dec 18 2015 %Y A109185 Cf. A070250, A106760, A107579, A109184, A109207. %K A109185 base,nonn %O A109185 1,1 %A A109185 _Zak Seidov_, Jun 22 2005