OFFSET
0,3
FORMULA
T(n,2*k) = A103997(n,k) for k > 0.
EXAMPLE
Square array begins:
1, 1, 1, 1, 1, 1, 1, ...
2, 1, 3, 4, 7, 11, 18, ...
4, 1, 11, 19, 71, 176, 539, ...
8, 1, 41, 91, 769, 2911, 17753, ...
16, 1, 153, 436, 8449, 48301, 603126, ...
32, 1, 571, 2089, 93127, 801701, 20721019, ...
64, 1, 2131, 10009, 1027207, 13307111, 714790675, ...
MATHEMATICA
T[n_, k_] := 2^n * Sqrt[Resultant[ChebyshevU[2*n, x/2], ChebyshevT[k, I*x/2], x]]; Table[T[k, n - k], {n, 0, 10}, {k, 0, n}] // Flatten (* Amiram Eldar, May 04 2021 *)
PROG
(PARI) {T(n, k) = sqrtint(4^n*polresultant(polchebyshev(2*n, 2, x/2), polchebyshev(k, 1, I*x/2)))}
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Seiichi Manyama, Apr 17 2020
STATUS
approved