|
Search: id:A108124
|
|
| |
|
| 0, 1, -2, 6, -20, 80, -366, 1904, -11080, 71424, -505210, 3891712, -32433180, 290787328, -2791053734, 28556359680, -310264194320, 3567710830592, -43287834157938, 552688817143808, -7407423764750500, 103981459115606016, -1525675236649033822, 23354749389657604096
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
MATHEMATICA
|
g[x_] = FullSimplify[x/(-1 + Sum[(-1)^n*x^(2*n - 1)/(2*n - 1)!, {n, 1, Infinity}])] h[x_, n_] = Dt[g[x], {x, n}] b[x_] = Table[h[x, n], {n, 0, 50}]; b[0]
|
|
CROSSREFS
|
Sequence in context: A150184 A150185 A144168 this_sequence A117574 A115084 A089179
Adjacent sequences: A108121 A108122 A108123 this_sequence A108125 A108126 A108127
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 26 2005
|
|
|
Search completed in 0.002 seconds
|
