|
%I #6 Mar 31 2012 10:26:26
%S 0,4,0,256,0,46656,0,16777216,0,10000000000,0,8916100448256,0,
%T 11112006825558016,0,18446744073709551616,0,39346408075296537575424,0,
%U 104857600000000000000000000,0,341427877364219557396646723584,0
%N Det(M) where M is an n X n antisymmetric matrix with M(i,j) = n for i < j.
%t 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}]
%K nonn
%O 1,2
%A _José María Grau Ribas_, Apr 07 2010
|
