OFFSET
0,2
FORMULA
a(n)^2 = 4^n * Resultant(U_{2*n}(x/2), T_{8}(i*x/2)), where T_n(x) is a Chebyshev polynomial of the first kind, U_n(x) is a Chebyshev polynomial of the second kind and i = sqrt(-1).
MATHEMATICA
a[n_] := 2^n * Sqrt[Resultant[ChebyshevU[2*n, x/2], ChebyshevT[8, I*x/2], x]]; Array[a, 15, 0] (* Amiram Eldar, May 04 2021 *)
PROG
(PARI) {a(n) = sqrtint(4^n*polresultant(polchebyshev(2*n, 2, x/2), polchebyshev(8, 1, I*x/2)))}
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Seiichi Manyama, Apr 17 2020
STATUS
approved