OFFSET
1,1
COMMENTS
a(16) > 3*10^13. - Brian Trial, May 13 2017
All multiples of 32 greater than 32 are of form 2^5*m and have at least 6 factors. Thus this sequence will be limited to a run of at most 31 integers. - Brian Trial, May 13 2017
a(18) > 2 * 10^15. - Toshitaka Suzuki, Aug 31 2025
EXAMPLE
a(3)=15470 because 15470 is the start of a record breaking run of 3 consecutive integers (15470 to 15472) each having 5 prime factors; i.e. bigomega(n)=A001222(n)=5 for n = 15470, ..., 15472.
MATHEMATICA
bigomega[n_] := Plus@@Last/@FactorInteger[n]; For[n=1; m=l=0, True, n++, If[bigomega[n]==5, l++, If[l>m, m=l; Print[n-l, " ", l]]; l=0]]
Table[SequencePosition[PrimeOmega[Range[15*10^6]], PadRight[{}, n, 5], 1][[All, 1]], {n, 6}]//Flatten (* The program generates the first six terms of the sequence. *) (* Harvey P. Dale, Sep 03 2022 *)
CROSSREFS
KEYWORD
fini,more,nonn
AUTHOR
Shyam Sunder Gupta, Feb 07 2002
EXTENSIONS
Edited by Dean Hickerson, Jul 31 2002
More terms from Jens Kruse Andersen, Aug 23 2003
a(13)-a(14) from Donovan Johnson, Jan 31 2009
a(15) from Brian Trial, May 13 2017
a(16)-a(17) from Toshitaka Suzuki, Aug 31 2025
STATUS
approved
