OFFSET
1,5
COMMENTS
Note that such partitions are necessarily strict.
EXAMPLE
The a(19) = 12 partitions:
(19),
(10,9), (11,8), (12,7), (13,6), (14,5), (15,4), (16,3), (17,2),
(8,6,5), (11,5,3),
(7,5,4,3).
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&UnsameQ@@LCM@@@Union[Rest[Subsets[#]]]&]], {n, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 17 2018
STATUS
approved