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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A285739 Numerator of discriminant of n-th Bernoulli polynomial. 1
 1, 1, 1, 28, 343, 31, 29791, 178035712, 11651995228221, 1087618835548371875, 13429024118357421875, 143533445691269324970571729935778225264543312, 91376242719004834465589805254054451484345405903423332764620213, 25397841834482816377486479267527401525220329290217 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,4 LINKS Table of n, a(n) for n=1..14. Eric Weisstein's World of Mathematics, Bernoulli Polynomial. Index entries for sequences related sequences related to discriminants of polynomials. EXAMPLE 1, 1/3, 1/16, 28/3375, 343/559872, 31/1815156, 29791/80621568, 178035712/124556484375, 11651995228221/80000000000000, ... The first few Bernoulli polynomials are 0 | 1; 1 | x - 1/2; 2 | x^2 - x + 1/6; 3 | x^3 - 3*x^2/2 + x/2; 4 | x^4 - 2*x^3 + x^2 - 1/30; 5 | x^5 - 5*x^4/2 + 5*x^3/3 - x/6, etc. MATHEMATICA Table[Numerator[Discriminant[BernoulliB[n, x], x]], {n, 1, 14}] PROG (PARI) a(n) = numerator(poldisc(bernpol(n))); \\ Michel Marcus, Mar 02 2023 CROSSREFS Cf. A053382, A053383, A196838, A196839, A285740 (denominators). Sequence in context: A092713 A134288 A200968 * A010833 A022720 A272174 Adjacent sequences: A285736 A285737 A285738 * A285740 A285741 A285742 KEYWORD nonn,frac AUTHOR Ilya Gutkovskiy, Apr 25 2017 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.

Last modified July 12 11:43 EDT 2024. Contains 374245 sequences. (Running on oeis4.)