A090539 Total number of parts equal to 1 in all plane partitions of n.

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

Author

Wouter Meeussen, Feb 01 2004

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 0..50

Crossrefs

Column k=1 of A092288.

Cf. A066633, A000219, A091298.

Programs

Mathematica

Table[Count[Flatten[planepartitions[k]], 1], {k, 17}]

PARI

A090539(n)=A092288(n,1) \\ M. F. Hasler, Sep 26 2018

Extensions

a(18)-a(27) from Vaclav Kotesovec, May 05 2018

a(28)-a(34) from Alois P. Heinz, Sep 24 2018