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 A098974 #16 Mar 13 2020 13:01:08
%S A098974 1669,2179,4177,4523,4759,5237,6173,6397,6737,7079,7369,7793,8123,
%T A098974 8329,9067,11003,11633,11839,12073,12119,13009,13267,16033,16193,
%U A098974 16453,16763,16787,17053,17683,17989,18593,18637,19183,19507,20483,22409,22877,23227
%N A098974 Primes p such that q-p = 24, where q is the next prime after p.
%C A098974 Lower prime of a difference of 24 between consecutive primes.
%C A098974 23 successive numbers after prime number p are composite. - _Artur Jasinski_, Jan 15 2007
%H A098974 Remi Eismann, <a href="/A098974/b098974.txt">Table of n, a(n) for n = 1..10000</a>
%H A098974 K. Soundararajan, <a href="https://doi.org/10.1090/S0273-0979-06-01142-6">Small gaps between prime numbers: the work of Goldston-Pintz-Yildirim</a>, Bull. Amer. Math. Soc., 44 (2007), 1-18.
%H A098974 <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>
%t A098974 a = {}; Do[If[Prime[x + 1] - Prime[x] == 24, AppendTo[a, Prime[x]]], {x, 1, 10000}]; a (* _Artur Jasinski_, Jan 15 2007 *)
%Y A098974 Cf. A000040, A001223, A054541, A075526, A001359, A054799, A063091, A096292, A015913, A023200, A029710, A031934, A031936, A031938.
%Y A098974 Cf. A000230, A023200, A031924, A031926, A031928, A031930, A031932, A061779.
%K A098974 nonn,easy
%O A098974 1,1
%A A098974 Douglas Winston (douglas.winston(AT)srupc.com), Oct 23 2004
%E A098974 Entry revised by _N. J. A. Sloane_, Feb 13 2007