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 A109208 #12 Jul 23 2023 01:51:09
%S A109208 2,3,5,7,919,31513,1008001,1123211,1160611,1268621,1286821,1311131,
%T A109208 1317131,1412141,1628261,1802081,1826281,3187813,3228223,3245423,
%U A109208 3286823,3291923,3362633,3528253,3591953,3765673,3773773,3781873
%N A109208 Palindromic primes p such that digit sum of p is a substring.
%C A109208 Cf. A052019 Sum of digits of prime p is substring of p.
%H A109208 Harvey P. Dale, <a href="/A109208/b109208.txt">Table of n, a(n) for n = 1..54</a> (all terms up to the 5 millionth prime)
%e A109208 31513 is a term because its digit sum 13 is a substring of 31513.
%t A109208 bb={};Do[id=IntegerDigits[p=Prime[n]];If[StringCount[ToString[p], ToString[Plus@@id]]>0&&Reverse[id]==id, AppendTo[bb, p]], {n, 1000000}];A109208=bb
%t A109208 Select[Prime[Range[300000]],PalindromeQ[#]&&SequenceCount[IntegerDigits[#],IntegerDigits[ Total[ IntegerDigits[ #]]]]>0&] (* _Harvey P. Dale_, Dec 04 2021 *)
%Y A109208 Cf. A052019.
%K A109208 base,nonn
%O A109208 1,1
%A A109208 _Zak Seidov_, Jun 22 2005