|
| |
|
|
A139000
|
|
a(n) = discriminant of n-th Bell's polynomial.
|
|
0
| |
|
|
1, -1, -5, 257, 227081, -5180893281, -4280906663314189, 171185545597850136406017, 426885502327596067385688208587793, -83152665259106642682190066734067859360190625
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
LINKS
| Weisstein, Eric W., Bell Polynomial.
|
|
|
EXAMPLE
| a(4) = 257 because discriminant of the 4-th Bell polynomial x + 7 x^2 + 6 x^3 + x^4 = 257
|
|
|
MATHEMATICA
| a = {}; Do[k = BellB[n, x]; AppendTo[a, Resultant[k, D[k, x], x]], {n, 1, 10}]; a
|
|
|
CROSSREFS
| Sequence in context: A181397 A055386 A201606 * A061959 A002554 A003383
Adjacent sequences: A138997 A138998 A138999 * A139001 A139002 A139003
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Apr 05 2008
|
| |
|
|
