OFFSET
1,2
COMMENTS
First differs from A304678 in having 300.
LINKS
Wikipedia, Mode (statistics).
EXAMPLE
The prime factorization of 300 is 2*2*3*5*5, with modes {2,5} and maximum 5, so 300 is in the sequence.
MATHEMATICA
prifacs[n_]:=If[n==1, {}, Flatten[ConstantArray@@@FactorInteger[n]]];
Select[Range[100], MemberQ[Commonest[prifacs[#]], Max[prifacs[#]]&]
CROSSREFS
Partitions of this type are counted by A171979.
KEYWORD
nonn
AUTHOR
Gus Wiseman, May 09 2023
STATUS
approved