A013155 Expansion of e.g.f.: exp(arctanh(x)+log(x+1))=1+2*x+3/2!*x^2+6/3!*x^3+21/4!*x^4+90/5!*x^5...

1, 2, 3, 6, 21, 90, 495, 3150, 23625, 198450, 1885275, 19646550, 225935325, 2809456650, 37927664775, 547844046750, 8491582724625, 139700231921250, 2444754058621875, 45123174910563750, 879901910755993125

Offset

0,2

Links

Table of n, a(n) for n=0..20.

Mathematica

With[{nn=20}, CoefficientList[Series[Exp[ArcTanh[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Oct 05 2021 *)

Crossrefs

a(2n+1) = 2 * A079484(n+1).

Sequence in context: A127294 A012924 A024485 * A303224 A007501 A227367

Adjacent sequences: A013152 A013153 A013154 * A013156 A013157 A013158

Keyword

nonn

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Extensions

Definition clarified by Harvey P. Dale, Oct 05 2021

Status

approved