A054691 - OEIS

%I #26 May 19 2024 02:12:13

%S 7,19,43,73,349,661,8629,13399,14629,24421,62299,187909,688453,850351,

%T 17382481,30752233,32822371,136283431,248641039,255949951,390817729,

%U 698542489,1256735191,1535220499,1899797989,2466641071,4289385523,24215097499,42441715489,43725662623

%N New records in A054690 (start of n consecutive non-twin primes).

%C Has many terms in common with A036061, but neither of the two is a subsequence of the other one. - _M. F. Hasler_, May 07 2022

%H Amiram Eldar, <a href="/A054691/b054691.txt">Table of n, a(n) for n = 1..41</a>

%o (Python)

%o from sympy import nextprime

%o from itertools import count, islice

%o def agen(): # generator of terms

%o     p, q, n, rl, argp = 2, 3, 1, 0, 2

%o     for k in count(1):

%o         if q - p >= 4: rl += 1

%o         else:

%o             if rl >= n: yield argp; n = rl + 1

%o             rl, argp = 0, q

%o         p, q = q, nextprime(q)

%o print(list(islice(agen(), 14))) # _Michael S. Branicky_, Aug 23 2022

%Y Cf. A054690, A054692, A242459.

%Y Cf. A036061.

%K nonn

%O 1,1

%A _Jeff Burch_, Apr 19 2000

%E a(10)-a(25) from _Sean A. Irvine_, Feb 17 2022

%E Offset changed and a(26)-a(29) from _Michael S. Branicky_, Aug 23 2022