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.

A359641 a(n) is the least odd prime not in A001359 such that all subsequent composites in the gap up to the next prime have exactly n odd prime factors, all with exponent 1.

This page as a plain text file.
%I A359641 #10 Feb 21 2023 17:17:26
%S A359641 307,8929,992263,229658167,28674536239
%N A359641 a(n) is the least odd prime not in A001359 such that all subsequent composites in the gap up to the next prime have exactly n odd prime factors, all with exponent 1.
%e A359641 a(3) = 8929: 8930 = 2*5*19*47, 8931 = 3*13*229, 8932 = 2^2*7*11*29;
%e A359641 a(6) = 28674536239: a(6)+1 = 2^4*5*7*31*43*107*359, a(6)+2 = 3*13*23*151*269*787, a(6)+3 = 2*11*17*19*37*191*571.
%o A359641 (PARI) obi(x,m=0) = {my (x2=x>>valuation(x,2), o=omega(x2)); if (o<m, return(0), if (bigomega(x2)-o, 0, o))};
%o A359641 a359641(maxp) = {my (k=2, pp=5); forprime (p=7, maxp, my(mi=oo, ma=0); if (p-pp>2, for (j=pp+1, p-1, my (mo=obi(j)); if (mo<k, mi=ma=0; break); mi=min(mo, mi); ma=max(mo, ma)); if (mi==k && ma==k, print1(pp, ", "); k++)); pp=p)};
%o A359641 a359641(3*10^8)
%Y A359641 Cf. A001222, A001359, A087436, A285800, A359640.
%K A359641 nonn,hard,more
%O A359641 2,1
%A A359641 _Hugo Pfoertner_, Jan 17 2023