OFFSET
1,9
FORMULA
T(n,k) = A330935(2^n,k).
EXAMPLE
Triangle begins:
1
0 1
0 1 1
0 1 3 2
0 1 5 8 4
0 1 9 25 28 11
0 1 13 57 111 99 33
0 1 20 129 379 561 408 116
Row n = 5 counts the following chains (minimum and maximum not shown):
() (14) (113)->(14) (1112)->(113)->(14)
(23) (113)->(23) (1112)->(113)->(23)
(113) (122)->(14) (1112)->(122)->(14)
(122) (122)->(23) (1112)->(122)->(23)
(1112) (1112)->(14)
(1112)->(23)
(1112)->(113)
(1112)->(122)
MATHEMATICA
sps[{}]:={{}}; sps[set:{i_, ___}]:=Join@@Function[s, Prepend[#, s]&/@sps[Complement[set, s]]]/@Cases[Subsets[set], {i, ___}];
mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]]];
upr[q_]:=Union[Sort/@Apply[Plus, mps[q], {2}]];
paths[eds_, start_, end_]:=If[start==end, Prepend[#, {}], #]&[Join@@Table[Prepend[#, e]&/@paths[eds, Last[e], end], {e, Select[eds, First[#]==start&]}]];
Table[Length[Select[paths[Join@@Table[{y, #}&/@DeleteCases[upr[y], y], {y, Sort/@IntegerPartitions[n]}], ConstantArray[1, n], {n}], Length[#]==k-1&]], {n, 8}, {k, n}]
CROSSREFS
Row sums are A213427.
Main diagonal is A002846.
Column k=3 is A007042.
Dominated by A330784.
The version for set partitions is A008826.
The version for factorizations is A330935.
KEYWORD
nonn,tabl
AUTHOR
Gus Wiseman, Jan 03 2020
STATUS
approved