A174310 Values of the family of polynomials y = (x^(n+1) + 1)/(x + 1) at point x = discriminant of y.

1, 0, 13, -4369, 242203001, 3653339505259535, 22540681439108936194378057, -85070916250026219054240312625736187905, 273892687731183836066546120028455556686378073137630689

Offset: 1

Author

Artur Jasinski, Mar 15 2010

Keywords

• sign

Comments

A174309 is a subsequence of this sequence.

Crossrefs

Cf. A174304, A174305, A174306, A174307, A174308, A174309, A174311.

Programs

Mathematica

s = {}; Do[k = PolynomialQuotient[(x^n + 1), (x + 1), x]; d = Discriminant[k, x]; AppendTo[s, k /. x -> d], {n, 1, 10}]; s