OFFSET
1,6
COMMENTS
A number's prime multiplicities are also called its (unsorted) prime signature. Numbers whose prime multiplicities are distinct are A130091.
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..65537
EXAMPLE
We have 9282 -> 546 -> 42 -> 6 -> 2 -> 1, so a(9282) = 5.
MATHEMATICA
Table[Length[FixedPointList[#/Max[Select[Divisors[#], UnsameQ@@Last/@FactorInteger[#]&]]&, n]]-2, {n, 100}]
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 16 2019
EXTENSIONS
Data section extended up to 105 terms by Antti Karttunen, Apr 02 2022
STATUS
approved