login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
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
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: A332372 A344818 A341529 * A146388 A230833 A321723
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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 18:04 EDT 2024. Contains 371254 sequences. (Running on oeis4.)