|
| |
|
|
A089924
|
|
Number of plane partitions of n with 3 or more columns.
|
|
4
| |
|
|
0, 0, 1, 3, 8, 19, 41, 85, 167, 319, 588, 1066, 1880, 3272, 5588, 9431, 15686, 25841, 42070, 67926
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,4
|
|
|
COMMENTS
| Because of symmetry of the 3-dimensional-Ferrers plots, this sequence also counts the plane partitions with 3 or more rows and the plane partitions with maximal element >= 3
|
|
|
LINKS
| PlanePartitions
|
|
|
EXAMPLE
| a(4)=3:
1111 111 211
.... 1.. ...
|
|
|
MATHEMATICA
| (*planepartitions[] : see link *); Table[Count[planepartitions[n], q_ /; Length[First[q]] >= 3], {n, 12}]
|
|
|
CROSSREFS
| Cf. A000219.
Sequence in context: A182818 A095846 A153732 * A178457 A072916 A074839
Adjacent sequences: A089921 A089922 A089923 * A089925 A089926 A089927
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Wouter Meeussen (wouter.meeussen(AT)pandora.be), Jan 11 2004
|
| |
|
|
