A176050 Det(M) where M is an n X n antisymmetric matrix with M(i,j) = n for i < j.

0, 4, 0, 256, 0, 46656, 0, 16777216, 0, 10000000000, 0, 8916100448256, 0, 11112006825558016, 0, 18446744073709551616, 0, 39346408075296537575424, 0, 104857600000000000000000000, 0, 341427877364219557396646723584, 0

Offset

1,2

Links

Table of n, a(n) for n=1..23.

Mathematica

a[i_, j_][n_] := Which[i < j, n, i > j, -n, True, 0]; M[n_] := Table[a[i, j][n], {i, n}, {j, n}]; Table[Det[M[n]], {n, 1, 50}]

Crossrefs

Sequence in context: A265596 A119010 A255018 * A099841 A013452 A013453

Adjacent sequences: A176047 A176048 A176049 * A176051 A176052 A176053

Keyword

nonn

Author

José María Grau Ribas, Apr 07 2010

Status

approved