A085605 Resultant of the polynomial x^n-1 and the Chebyshev polynomial of the second kind U_n(x).
2, 9, 448, 21025, 25566816, 13167792001, 374186407100416, 2185268430227969025, 1406243047344105338882560, 95493100905174500882676787201, 1357963145594500259453732165378899968, 1093895614508277127564115719556899066650625
Offset: 1
Keywords
Links
- Andrew Howroyd, Table of n, a(n) for n = 1..50
Crossrefs
Cf. A086840.
Programs
-
Mathematica
Table[Resultant[x^n - 1, ChebyshevU[n, x], x], {n, 1, 15}] (* Vaclav Kotesovec, Apr 15 2020 *)
-
PARI
a(n)={polresultant(x^n-1, polchebyshev(n, 2, x))} \\ Andrew Howroyd, Jul 10 2018
Extensions
Terms a(7) and beyond from Andrew Howroyd, Jul 10 2018