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 A351662 #43 Feb 22 2022 09:29:58 %S A351662 216421,393301,588673,601687,627481,752023,776257,801187,842521, %T A351662 846427,892159,970573,976117,1036153,1100581,1238833,1445341,1713853, %U A351662 1848337,2054761,2134519,2217349,2229991,2276107,2287861,2299327,2303377,2768341,2933083,3091027 %N A351662 Initial primes of four consecutive primes with consecutive gaps 10, 20, 30. %e A351662 601687, 601697, 601717, and 601747 are four consecutive primes and the gaps between them are 10, 20, and 30. %t A351662 Prime[SequencePosition[Differences[Prime[Range[250000]]],{10,20,30}][[All,1]]] %o A351662 (Python) %o A351662 from sympy import nextprime %o A351662 from itertools import islice %o A351662 def agen(): # generator of terms %o A351662 p, q, r, s = 2, 3, 5, 7 %o A351662 while True: %o A351662 if q-p == 10 and r-q == 20 and s-r == 30: %o A351662 yield p %o A351662 p, q, r, s = q, r, s, nextprime(s) %o A351662 print(list(islice(agen(), 30))) # _Michael S. Branicky_, Feb 19 2022 %Y A351662 Cf. A190814, A190792, A190817, A190819, A190838. %K A351662 nonn %O A351662 1,1 %A A351662 _Harvey P. Dale_, Feb 19 2022