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 A156299 #6 Apr 03 2023 10:36:11 %S A156299 31,41,43,53,61,71,73,83,97,211,311,401,421,431,433,503,521,523,541, %T A156299 601,613,631,641,643,653,701,733,743,751,761,811,821,823,827,853,857, %U A156299 863,877,907,911,937,941,947,953,967,971,977,983 %N A156299 Primes where the first digit is greater than any other digit. %H A156299 Harvey P. Dale, <a href="/A156299/b156299.txt">Table of n, a(n) for n = 1..1000</a> %H A156299 Chris Caldwell, <a href="https://t5k.org/lists/small/1000.txt">The first 1000 Primes</a> %e A156299 983 is a prime in which the first digit is greater than any other digit. %t A156299 fdgQ[n_]:=Module[{idn=IntegerDigits[n],f},f=First[idn];Max[idn]==f&&And@@ Table[f>i,{i,Rest[idn]}]]; Select[Prime[Range[5,200]],fdgQ] (* _Harvey P. Dale_, Sep 18 2013 *) %Y A156299 A000040 %K A156299 nonn,base %O A156299 1,1 %A A156299 _Parthasarathy Nambi_, Feb 07 2009