1,2

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

Cf. A066633.

Sequence in context: A108985 A014151 A096124 this_sequence A113478 A056601 A003230

Adjacent sequences: A090536 A090537 A090538 this_sequence A090540 A090541 A090542

nonn

Wouter Meeussen (wouter.meeussen(AT)pandora.be), Feb 01 2004