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