A385470 - OEIS

A385470

Expansion of e.g.f. 1/(1 - 2 * arctanh(x)).

1, 2, 8, 52, 448, 4848, 62912, 952992, 16496640, 321282816, 6952332288, 165489858048, 4297340166144, 120890184308736, 3662409013420032, 118879239686541312, 4115985952586858496, 151415632063102648320, 5897814669785134006272, 242489327746828076974080

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

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

FORMULA

E.g.f.: B(x)^2, where B(x) is the e.g.f. of A385468.

E.g.f.: 1/(1 - log((1+x)/(1-x))).

a(n) = Sum_{k=0..n} 2^k * k! * A111594(n,k).

a(n) ~ 2^(3/2) * sqrt(Pi) * (1 + exp(1))^(n-1) * n^(n + 1/2) / (exp(n-1) * (exp(1) - 1)^(n+1)). - Vaclav Kotesovec, Jun 30 2025

MATHEMATICA

With[{nn=20}, CoefficientList[Series[1/(1-2ArcTanh[x]), {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jul 04 2025 *)

PROG

(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(1/(1-2*atanh(x))))

CROSSREFS

Cf. A296676, A385471.

Cf. A111594, A385468.

Sequence in context: A027329 A136794 A125787 * A358031 A368453 A007832

Adjacent sequences: A385467 A385468 A385469 * A385471 A385472 A385473

KEYWORD

nonn,easy

AUTHOR

Seiichi Manyama, Jun 30 2025

STATUS

approved