OFFSET
0,3
LINKS
Wikipedia, Toeplitz Matrix
EXAMPLE
a(4) = 16:
[ 1, 2*i, 4*i, 3*i;
-2*i, 1, 2*i, 4*i;
-4*i, -2*i, 1, 2*i;
-3*i, -4*i, -2*i, 1 ]
MATHEMATICA
a={1}; For[n=1, n<=8, n++, mn=Infinity; For[d=1, d<=n, d++, For[i=1, i<=(n-1)!, i++, If[0<(t=Abs[Det[ToeplitzMatrix[Join[{d}, I Part[Permutations[Drop[Range[n], {d}]], i]]]]])<mn, mn=t]]]; AppendTo[a, mn]]; a
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Stefano Spezia, Jan 21 2023
STATUS
approved