OFFSET
0,3
MATHEMATICA
Flatten[{1, Table[Permanent[Table[PartitionsQ[i+j], {i, 1, n}, {j, 1, n}]], {n, 1, 14}]}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Nov 29 2016
STATUS
approved