|
Search: id:A089148
|
|
| |
|
| 1, 0, -1, -1, 5, 19, -41, -519, -183, 19223, 73451, -847067, -8554547, 32488611, 977198559, 1325135969, -116987762287, -860498433233, 13730866757587, 243612350234973, -1120827248102379, -62079344419449925, -185852602587850681, 15185914155303053209
(list; graph; listen)
|
|
|
OFFSET
|
0,5
|
|
|
COMMENT
|
INVERTi transform of [1, 1, 1/2, 1/6, 1/24, 1/120,...] = [1, 0, -1/2, 1/6, 5/24, -19/120, -41/720, 519/5040, -183/40320, -19223/362880,...] [From Gary W. Adamson (qntmpkt(AT)yahoo.com), Oct 08 2008]
|
|
MATHEMATICA
|
a = CoefficientList[Series[1/( E^ x - x), {x, 0, 30}], x]; Table[(n - 1)!*a[[n]], {n, 1, Length[a]}] - Roger L. Bagula and Gary W. Adamson (rlbagulatftn(AT)yahoo.com), Oct 06 2008
|
|
CROSSREFS
|
Sequence in context: A033622 A091568 A147307 this_sequence A098319 A022267 A094465
Adjacent sequences: A089145 A089146 A089147 this_sequence A089149 A089150 A089151
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Wouter Meeussen (wouter.meeussen(AT)pandora.be), Dec 06 2003
|
|
|
Search completed in 0.002 seconds
|