OFFSET
0,3
COMMENTS
Conjecture: for n > 0, det(M(2n)) = n^2 = A000290(n) with det(M(0)) = 1.
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..18
Wikipedia, Skew-symmetric matrix
Wikipedia, Toeplitz Matrix
EXAMPLE
For n = 2 the matrix M(4) is
0 1 1 2
-1 0 1 1
-1 -1 0 1
-2 -1 -1 0
with permanent a(2) = 8.
MATHEMATICA
nmax:=13; k[i_]:=Floor[i/2]; a[n_]:=If[n==0, 1, Permanent[ToeplitzMatrix[-Array[k, n], Array[k, n]]]]; Table[a[2n], {n, 0, nmax}]
PROG
(PARI) tm(n) = {my(m = matrix(n, n, i, j, if (i==1, floor(j/2), if (j==1, -floor(i/2))))); for (i=2, n, for (j=2, n, m[i, j] = m[i-1, j-1]; ); ); m; }
a(n) = matpermanent(tm(2*n));
CROSSREFS
KEYWORD
sign
AUTHOR
Stefano Spezia, Jan 18 2020
STATUS
approved