OFFSET
1,3
COMMENTS
A rooted partition of n is an integer partition of n - 1. A rooted twice-partition of n is a choice of a rooted partition of each part in a rooted partition of n.
EXAMPLE
The a(9) = 8 rooted twice-partitions:
(7), (61), (52), (43), (421),
(3)(21), (21)(3),
()()()()()()()().
MATHEMATICA
twirtns[n_]:=Join@@Table[Tuples[IntegerPartitions[#-1]&/@ptn], {ptn, IntegerPartitions[n-1]}];
Table[Select[twirtns[n], SameQ@@Total/@#&&UnsameQ@@Join@@#&]//Length, {n, 20}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Gus Wiseman, Mar 26 2018
STATUS
approved