OFFSET
1,9
EXAMPLE
Triangle begins:
1
0 1
0 1 1
0 1 2 1
0 1 3 4 1
0 1 4 8 6 1
0 1 5 14 18 9 1
0 1 6 21 39 35 12 1
0 1 7 30 72 97 62 16 1
0 1 8 40 120 214 212 103 20 1
0 1 9 52 185 416 563 429 161 25 1
MATHEMATICA
art[n_]:=If[n==1, {{}}, Join@@Table[Select[Tuples[art/@c], OrderedQ], {c, Join@@Permutations/@IntegerPartitions[n-1]}]];
Table[Length[Select[art[n], Count[#, _[__], {0, Infinity}]==k&]], {n, 1, 10}, {k, 0, n-1}]
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Gus Wiseman, Nov 23 2022
STATUS
approved