cp's OEIS Frontend

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.

A351662 Initial primes of four consecutive primes with consecutive gaps 10, 20, 30.

This page as a plain text file.
%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