1,2
Table[Count[Flatten[planepartitions[k]], 1], {k, 17}]
Cf. A066633.
Sequence in context: A014151 A176759 A096124 * A113478 A056601 A003230
Adjacent sequences: A090536 A090537 A090538 * A090540 A090541 A090542
nonn
Wouter Meeussen (wouter.meeussen(AT)pandora.be), Feb 01 2004