login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A174308 Values of the family of polynomials y = Sum_{z = 0..n-1} x^z at point x = discriminant of y. 8
1, 2, 7, -3855, 246109501, 3658981728433681, 22537999301860113141522943, -85070267212918892756053780436965654527, 273892802259521776518514883585359984420603636167980521, 1000000010000000100000001000000010000000100000001000000010000000100000001 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
MATHEMATICA
Clear[x]; s = {}; Do[pol = Simplify[(x^n - 1)/(x - 1)]; d = Discriminant[pol, x]; AppendTo[s, pol /. x -> d], {n, 1, 10}]; s
PROG
(PARI) a(n) = my(p=sum(k=0, n-1, x^k)); subst(p, x, poldisc(p)); \\ Michel Marcus, Mar 02 2023
CROSSREFS
Sequence in context: A358482 A320505 A144836 * A088549 A226704 A224420
KEYWORD
sign
AUTHOR
Artur Jasinski, Mar 15 2010
EXTENSIONS
One more term from Michel Marcus, Mar 02 2023
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 21 10:04 EDT 2024. Contains 371852 sequences. (Running on oeis4.)