OFFSET
1,9
EXAMPLE
The a(21) = 13 partitions:
(8,7,6), (9,7,5), (10,7,4), (11,7,3), (12,7,2), (13,7,1),
(7,6,5,3), (8,6,4,3), (9,7,4,1), (10,6,3,2), (11,6,3,1), (12,4,3,2), (12,5,3,1).
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&UnsameQ@@Total/@Union[Subsets[#]]&&!UnsameQ@@Mean/@Union[Subsets[#]]&]], {n, 20}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 01 2018
STATUS
approved