[go: up one dir, main page]

login
A174310
Values of the family of polynomials y = (x^(n+1) + 1)/(x + 1) at point x = discriminant of y.
7
1, 0, 13, -4369, 242203001, 3653339505259535, 22540681439108936194378057, -85070916250026219054240312625736187905, 273892687731183836066546120028455556686378073137630689
OFFSET
1,3
COMMENTS
A174309 is a subsequence of this sequence.
MATHEMATICA
s = {}; Do[k = PolynomialQuotient[(x^n + 1), (x + 1), x]; d = Discriminant[k, x]; AppendTo[s, k /. x -> d], {n, 1, 10}]; s
KEYWORD
sign
AUTHOR
Artur Jasinski, Mar 15 2010
STATUS
approved