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

1, 1, 6, 65, 1737, 91359, 8755730, 1465091787, 420070484342, 194857695312573, 142349343815684947, 161388097061567486595, 276760372468557882285737, 707850058213409589011565269, 2654427644322345709705054800083

Offset

0,3

Links

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

Mathematica

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

Crossrefs

Cf. A000009, A005249, A204249, A278839, A278840.

Sequence in context: A006959 A121017 A239998 * A327228 A359854 A284067

Adjacent sequences: A278838 A278839 A278840 * A278842 A278843 A278844

Keyword

nonn

Author

Vaclav Kotesovec, Nov 29 2016

Status

approved