login
This site is supported by donations to The OEIS Foundation.

 

Logo

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.

License Agreements, Terms of Use, Privacy Policy. .

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