This site is supported by donations to The OEIS Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A013573 Expansion of e.g.f. exp(arctanh(x)/exp(x)). 1
 1, 1, -1, 0, 9, -20, 65, 406, -511, 21624, 88577, 1053426, 14764321, 143838916, 2193647521, 29669704702, 457719400449, 7433158061552, 128311987616769, 2329120580336746, 45112841958764321, 905762343424701116 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,5 LINKS G. C. Greubel, Table of n, a(n) for n = 0..400 EXAMPLE exp(arctanh(x)/exp(x)) = 1 + x - 1/2!*x^2 + 9/4!*x^4 - 20/5!*x^5 + 65/6!*x^6 ... MATHEMATICA With[{nn = 50}, CoefficientList[Series[Exp[ArcTanh[x]/Exp[x]], {x, 0, nn}], x] Range[0, nn]!] (* G. C. Greubel, Nov 20 2016 *) PROG (PARI) x='x + O('x^50); Vec(serlaplace(exp(atanh(x)/exp(x)))) \\ G. C. Greubel, Nov 20 2016 CROSSREFS Sequence in context: A128153 A249044 A109805 * A146388 A230833 A321723 Adjacent sequences:  A013570 A013571 A013572 * A013574 A013575 A013576 KEYWORD sign AUTHOR Patrick Demichel (patrick.demichel(AT)hp.com) STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 15 18:48 EST 2019. Contains 319170 sequences. (Running on oeis4.)