OFFSET
1,1
PROG
(PARI) Hnmin2 = 1; Hnmin1 = 2*x; print1(polresultant(x - 1, Hnmin1), ", "); for (n = 2, 12, H = 2*x*Hnmin1 - 2*(n - 1)*Hnmin2; print1(polresultant(x^n - 1, H), ", "); Hnmin2 = Hnmin1; Hnmin1 = H); \\ David Wasserman, Feb 08 2005
(PARI) a(n) = polresultant(x^n-1, polhermite(n)); \\ Michel Marcus, Apr 13 2020
CROSSREFS
KEYWORD
sign
AUTHOR
Yuval Dekel (dekelyuval(AT)hotmail.com), Aug 15 2003
EXTENSIONS
More terms from David Wasserman, Feb 08 2005
STATUS
approved