OFFSET
1,1
COMMENTS
LINKS
David A. Corneth, Table of n, a(n) for n = 1..10000
EXAMPLE
174636000 = 2^5 * 3^4 * 5^3 * 7^2 * 11^1 has five distinct exponents so belongs to the sequence.
MATHEMATICA
Select[Range[300000000], Length[Union[Last/@FactorInteger[#]]]==5&]
PROG
(PARI) is(n) = #Set(factor(n)[, 2]) == 5 \\ David A. Corneth, Jan 12 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jan 03 2019
EXTENSIONS
a(13)-a(24) from Daniel Suteu, Jan 12 2019
STATUS
approved