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 A156307 #17 Feb 16 2020 11:56:16
%S A156307 11,101,211,431,523,541,743,761,853,2011,4013,4211,5023,5113,7043,
%T A156307 7151,7331,8017,8053,8161,8233,8431,8521,20011,20101,21001,40013,
%U A156307 40031,41201,42101,50023,50131,50221,50311,51031,52021,52201,53101,54001,70061,70223,70241,70313,71411,72221,73013,73121,74021,74201,75011,76001,80071,80107,80233,80251,80341,80611,80701
%N A156307 Primes where the first digit equals the sum of all the other digits.
%C A156307 There is no term that begins with 3, 6 or 9. - _Bernard Schott_, Feb 16 2020
%H A156307 Daniel Starodubtsev, <a href="/A156307/b156307.txt">Table of n, a(n) for n = 1..1000</a>
%e A156307 4211 is a prime where the first digit equals the sum of all the other digits.
%t A156307 ferQ[n_]:=Module[{idn=IntegerDigits[n]},First[idn]==Total[Rest[idn]]]; Select[Prime[Range[8000]],ferQ] (* _Harvey P. Dale_, Jun 22 2011 *)
%Y A156307 Cf. A000040.
%K A156307 nonn,base
%O A156307 1,1
%A A156307 _Parthasarathy Nambi_, Feb 07 2009
%E A156307 Corrected and extended by _Zak Seidov_, Feb 08 2009