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 A354220 #10 May 21 2022 14:07:51 %S A354220 1,2,3,4,5,6,7,8,9,14,15,16,20,25,27,37,38,39,40,41,45,49,56,64,66,89, %T A354220 90,114,120,131,145,154,164,174,187,207,217,218,222,225,266,302,328, %U A354220 329,330,351,364,369,377,381,437,447,449,454,461,468,497,530,535,548,551 %N A354220 a(n) is the record setting number of distinct prime factors in the product of the composite numbers between p = A354219(n) and the next prime after p. %t A354220 Union@ FoldList[Max, Array[PrimeNu[Times @@ FactorInteger[Times @@ Range[#1 + 1, #2 - 1]][[All, 1]]] & @@ Map[Prime, # + {0, 1}] &, 10^4]] (* _Michael De Vlieger_, May 20 2022 *) %Y A354220 Cf. A001221, A076978, A354219. %K A354220 nonn %O A354220 1,2 %A A354220 _Hugo Pfoertner_, May 20 2022