OFFSET
1,32
EXAMPLE
The a(3456) = 28 factorizations are:
(4*8*9*12) (4*9*96) (36*96) (3456)
(8*9*48) (4*864)
(4*12*72) (48*72)
(4*16*54) (54*64)
(4*18*48) (8*432)
(4*24*36) (9*384)
(4*27*32) (12*288)
(4*8*108) (16*216)
(8*12*36) (18*192)
(8*16*27) (24*144)
(8*18*24) (27*128)
(9*12*32) (32*108)
(9*16*24)
(12*16*18)
MATHEMATICA
Table[Length[Select[facs[n], UnsameQ@@#&&NoneTrue[#, SquareFreeQ]&]], {n, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Oct 08 2024
STATUS
approved