Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A370815
Number of integer factorizations of n into unordered factors > 1, such that only one set can be obtained by choosing a different divisor of each factor.
4
1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0
OFFSET
1,72
EXAMPLE
The a(432) = 3 factorizations: (2*2*3*4*9), (2*3*3*4*6), (2*6*6*6).
MATHEMATICA
facs[n_]:=If[n<=1, {{}}, Join@@Table[Map[Prepend[#, d]&, Select[facs[n/d], Min@@#>=d&]], {d, Rest[Divisors[n]]}]];
Table[Length[Select[facs[n], Length[Union[Sort /@ Select[Tuples[Divisors/@#], UnsameQ@@#&]]]==1&]], {n, 100}]
CROSSREFS
For partitions and prime factors we have A370594, ranks A370647.
Partitions of this type are counted by A370595, ranks A370810.
For prime factors we have A370645, subsets A370584.
A000005 counts divisors.
A001055 counts factorizations, strict A045778.
A239312 counts condensed partitions, ranks A355740, complement A370320.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A368414 counts factor-choosable factorizations, complement A368413.
A370814 counts divisor-choosable factorizations, complement A370813.
Sequence in context: A375933 A373976 A369164 * A056137 A332602 A306383
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 06 2024
STATUS
approved