OFFSET
1,1
COMMENTS
EXAMPLE
T(3,3)=4 because the only solid partitions of 3+1=4 that can be shrunk in exactly 3 ways to plane partitions of 3 are
[{{2,1},{1}}], [{{2,1}},{{1}}], [{{2},{1}},{{1}}] and [{{1,1},{1}},{{1}}].
MATHEMATICA
(* functions 'solidform' and 'coverssolidQ', see A098052 *) Table[Frequencies[Count[Flatten[solidform / @ Partitions[n+1]], q_/; coverssolidQ[q, # ]]&/ @ Flatten[solidform / @ Partitions[n]]], {n, 1, 8}]
CROSSREFS
KEYWORD
more,nonn,tabf
AUTHOR
Wouter Meeussen, Sep 12 2004
STATUS
approved