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.

A359242 Consider the race between primes, squarefree semiprimes, ..., products of k distinct primes; sequence indicates when one overtakes another to give a new race leader.

This page as a plain text file.
%I A359242 #12 Jan 09 2023 13:02:52
%S A359242 2,58,61,65,73,77,1279789,1280057,1280066,1280073,1280437,1280441,
%T A359242 1281155,1281161,1281165,1281179,1281190,1281243,1281247,1281262,
%U A359242 1281271,1281313,1281365
%N A359242 Consider the race between primes, squarefree semiprimes, ..., products of k distinct primes; sequence indicates when one overtakes another to give a new race leader.
%C A359242 This is A276176 for squarefree integers as listed in A340316 table.
%o A359242 (PARI) lista() = {my(nb = 10^7); my(ip = 1); while (factorback(primes(ip)) < nb, ip++); my(vp = vector(ip), list = List([2]), listi = List([1]), lastnb=1, lasti=1, nba = 3, nbb = nb); vp[lasti]++; for (i=1, 2, forsquarefree(isqf=nba, nbb, my(newi = omega(isqf[2])); vp[newi]++; if (newi != lasti,  if (vp[newi] > vp[lasti], lasti = newi; listput(list, isqf[1]); listput(listi, vp[newi]);););); nba = nbb + 1; nbb = nbb + nb;); Vec(list);} \\ _Michel Marcus_, Dec 22 2022
%Y A359242 Cf. A276176, A340316.
%Y A359242 Essentially the same as A335293.
%K A359242 nonn,more
%O A359242 1,1
%A A359242 _Michel Marcus_, Dec 22 2022
%E A359242 Name clarified by _Peter Munn_, Dec 31 2022