|
%I #29 Feb 25 2024 09:03:03
%S 1,1,2,4,12,35,120,427,1628,6090,23797,90296,350726,1338076,5165957,
%T 19732508
%N Number of monomials in expansion of determinant of an n X n Toeplitz matrix [ t(|i-j|) ] in terms of its entries.
%p with(LinearAlgebra): f:=n->nops([coeffs(Determinant(Matrix(n, (i,j) -> a[abs(i-j)])))]): [seq(f(n),n=0..12)];
%t f[n_] := Length[ Expand[ Det[ Table[ t[ Abs[ i - j]], {i, 1, n}, {j, 1, n}]]]]; Table[ f[n], {n, 1, 11}]
%Y Cf. A019448, A086647.
%K nonn,more,hard
%O 0,3
%A Herbert S. Wilf
%E Terms a(12) and a(13) from _Thotsaporn Thanatipanonda_, Jan 26-28 2012
%E Terms a(14) and a(15) from _Roman Pearce_, Aug 30 2014
%E a(0)=1 prepended by _Alois P. Heinz_, Feb 25 2024
|
