A278840 a(n) = permanent M_n where M_n is the n X n matrix m(i,j) = A000041(i+j).

1, 2, 19, 642, 58884, 13569779, 6931351962, 7532494931779, 16299546505518855, 67814300022651169814, 520884812091898994319805, 7206655416715261673779120809, 174009567319884878178189603283634, 7196671016523025599652036668556922867

Offset

0,2

Links

Table of n, a(n) for n=0..13.

Mathematica

Flatten[{1, Table[Permanent[Table[PartitionsP[i+j], {i, 1, n}, {j, 1, n}]], {n, 1, 14}]}]

Crossrefs

Cf. A000041, A005249, A204249, A278838, A278841.

Sequence in context: A270918 A296235 A290302 * A300995 A086976 A118189

Adjacent sequences: A278837 A278838 A278839 * A278841 A278842 A278843

Keyword

nonn

Author

Vaclav Kotesovec, Nov 29 2016

Status

approved