|
|
A067821
|
|
The start of a record-breaking run of consecutive integers with a number of prime factors (counted with multiplicity) equal to 6.
|
|
6
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(3)=33614 because 33614 is the start of a record breaking run of 3 consecutive integers (33614 to 33616) each having 6 prime factors; i.e., bigomega(n)=A001222(n)=6 for n = 33614, ..., 33616.
|
|
MATHEMATICA
|
bigomega[n_] := Plus@@Last/@FactorInteger[n]; For[n=1; m=l=0, True, n++, If[bigomega[n]==6, l++, If[l>m, m=l; Print[n-l, " ", l]]; l=0]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
fini,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|