|
Search: id:A139000
|
|
|
| A139000 |
|
a(n) = discriminant of n-th Bell's polynomial. |
|
+0
1
|
|
| 1, -1, -5, 257, 227081, -5180893281, -4280906663314189, 171185545597850136406017, 426885502327596067385688208587793, -83152665259106642682190066734067859360190625
(list; graph; listen)
|
|
|
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: A002770 A069071 A055386 this_sequence A061959 A002554 A003383
Adjacent sequences: A138997 A138998 A138999 this_sequence A139001 A139002 A139003
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Apr 05 2008
|
|
|
Search completed in 0.002 seconds
|
