[go: up one dir, main page]

login
A176050
Det(M) where M is an n X n antisymmetric matrix with M(i,j) = n for i < j.
0
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
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
KEYWORD
nonn
AUTHOR
STATUS
approved