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 A109207 #16 Dec 18 2015 11:15:39
%S A109207 3998993,7696967,7778777,7794977,7868687,7884887,7958597,9586859,
%T A109207 9758579,9782879,9938399,138989831,139969931,148888841,148969841,
%U A109207 157888751,159929951,166888661,167787761,168929861,169666961,174989471
%N A109207 Palindromic primes with digit sum = 50.
%H A109207 Chai Wah Wu, <a href="/A109207/b109207.txt">Table of n, a(n) for n = 1..13935</a>
%t A109207 Do[p=Join[IntegerDigits[n], Reverse[Drop[IntegerDigits[n], -1]]]; q=Plus@@p; If[PrimeQ[FromDigits[p]]&&q==50, Print[FromDigits[p]]], {n, 1, 10^7}] (* _Vincenzo Librandi_, Dec 18 2015 *)
%t A109207 Select[Prime@ Range[10^7], And[# == Reverse@ #, Total@ # == 50] &@ IntegerDigits@ # &] (* _Michael De Vlieger_, Dec 18 2015 *)
%o A109207 (PARI) isok(n) = isprime(n) && (d=digits(n)) && (Vecrev(d)==d) && (sumdigits(n)==50); \\ _Michel Marcus_, Dec 18 2015
%Y A109207 Cf. A070250, A109184, A109185 (resp.) Palindromic primes with digit sum = 10, 20, 40 (resp.); A107579, A106760 (resp.) Primes with digit sum = 10, 20 (resp.).
%K A109207 base,nonn
%O A109207 1,1
%A A109207 _Zak Seidov_, Jun 22 2005