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

1, 2, 1, -2, 2, 3, 0, -3, -1, 4, -3, -3, 2, -1, -12, 12, 11, 6, -5, 0, 5, -4, -9, -11, 1, 4, -20, -20, -4, 9, -18, -27, 8, 52, -73, 83, 245, 88, -60, -217, -157, 74, -30, -99, 57, 74, -29, -36, 101, 320, -205, -206, 125, -109, -27, 139, -203, -644, -629, 723

Offset

0,2

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..500

Mathematica

Flatten[{1, Table[Det[Table[PartitionsP[i+j], {i, n}, {j, n}]], {n, 1, 100}]}]

Crossrefs

Cf. A000041, A005249, A071543, A204249, A278839, A278840.

Sequence in context: A140085 A071445 A144081 * A140086 A037194 A326130

Adjacent sequences: A278835 A278836 A278837 * A278839 A278840 A278841

Keyword

sign

Author

Vaclav Kotesovec, Nov 29 2016

Status

approved