OFFSET
0,4
LINKS
Fausto A. C. Cariboni, Table of n, a(n) for n = 0..250
EXAMPLE
The a(1) = 1 through a(10) = 10 partitions (A = 10):
(1) (2) (3) (4) (5) (6) (7) (8) (9) (A)
(21) (31) (32) (42) (43) (53) (54) (64)
(41) (51) (52) (62) (63) (73)
(321) (61) (71) (72) (82)
(421) (431) (81) (91)
(521) (432) (532)
(531) (541)
(621) (631)
(721)
(4321)
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&UnsameQ@@Times@@@Subsets[Union[#], {2}]&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, May 31 2019
STATUS
approved