A174309 Value of the polynomial y = (x^(2n-1) + 1)/(x + 1) at the point x = discriminant of y.

1, 13, 242203001, 22540681439108936194378057, 273892687731183836066546120028455556686378073137630689

Offset: 1

Author

Artur Jasinski, Mar 15 2010

Keywords

• nonn

Crossrefs

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

Programs

Mathematica

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

PARI

a(n) = my(p=(x^(2*n-1) + 1)/(x + 1)); subst(p, x, poldisc(p)); \\ Michel Marcus, Mar 02 2023