OFFSET
1,210
COMMENTS
First term greater than 1 is a(210) = 4.
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
EXAMPLE
The a(420) = 3 factorizations: (6*70), (10*42), (14*30).
MATHEMATICA
sqnopfacs[n_]:=If[n<=1, {{}}, Join@@Table[Map[Prepend[#, d]&, Select[sqnopfacs[n/d], Min@@#>=d&]], {d, Select[Rest[Divisors[n]], !PrimeQ[#]&&SquareFreeQ[#]&]}]]
Table[Length[sqnopfacs[n]], {n, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Nov 25 2018
STATUS
approved