login
A090539
Total number of parts equal to 1 in all plane partitions of n.
4
0, 1, 4, 11, 28, 62, 137, 278, 561, 1080, 2051, 3778, 6885, 12255, 21589, 37409, 64160, 108612, 182234, 302461, 497997, 812579, 1316225, 2115608, 3378239, 5357855, 8447086, 13237631, 20632630, 31985504, 49339795, 75738099, 115731636, 176055280, 266697522
OFFSET
0,3
LINKS
MATHEMATICA
Table[Count[Flatten[planepartitions[k]], 1], {k, 17}]
PROG
(PARI) A090539(n)=A092288(n, 1) \\ M. F. Hasler, Sep 26 2018
CROSSREFS
Column k=1 of A092288.
Sequence in context: A239031 A289217 A329141 * A262050 A293628 A113478
KEYWORD
nonn
AUTHOR
Wouter Meeussen, Feb 01 2004
EXTENSIONS
a(18)-a(27) from Vaclav Kotesovec, May 05 2018
a(28)-a(34) from Alois P. Heinz, Sep 24 2018
STATUS
approved