OFFSET
0,2
LINKS
G. Kuperberg, Symmetry classes of alternating-sign matrices under one roof, arXiv:math/0008184 [math.CO], 2000-2001; [Th. 3].
MAPLE
A059487 := proc(n) local i, j, t1; t1 := (-1)^(n*(n-1)/2)*2^(2*n^2-n); for i to n do for j to n do t1 := t1*(4*j - 4*i + 1)/(j - i + n); end do end do; t1 end proc;
MATHEMATICA
a[n_] := Module[{t1 = (-1)^(n*(n - 1)/2)*2^(2*n^2 - n)}, Do[t1 = t1*(4*j - 4*i + 1)/(j - i + n), {j, n}, {i, n}]; t1];
Array[a, 11, 0] (* Jean-François Alcover, Nov 28 2017, from Maple *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Feb 04 2001
STATUS
approved