|
Search: id:A109575
|
|
|
| A109575 |
|
E.g.f.: x/(1+12x-8x^3) = x/[1-Hermite(3,x)]. |
|
+0
1
|
|
| 0, 1, -24, 864, -41280, 2465280, -176670720, 14770990080, -1411388375040, 151717608161280, -18121032076492800, 2380798038166732800, -341232779553826406400, 52983548082050826240000, -8859638774461689652838400, 1587282455497648568795136000
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
"Bernoulli numbers" for x/[1-Hermite(3,x)].
|
|
MAPLE
|
G:=x/(1+12*x-8*x^3): Gser:=series(G, x=0, 20): 0, seq(n!*coeff(Gser, x^n), n=1..16); # yields the signed sequence
|
|
MATHEMATICA
|
g[x_] = x/(-1 + HermiteH[3, x]) h[x_, n_] = Dt[g[x], {x, n}] a[x_] = Table[h[x, n], {n, 0, 50}]; b = a[0]
|
|
CROSSREFS
|
Adjacent sequences: A109572 A109573 A109574 this_sequence A109576 A109577 A109578
Sequence in context: A078522 A005149 A027411 this_sequence A107391 A006147 A061236
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 28 2005
|
|
|
Search completed in 0.002 seconds
|
