OFFSET
0,2
FORMULA
E.g.f.: B(x)^3, where B(x) is the e.g.f. of A385469.
E.g.f.: 1/(1 - (3/2) * log((1+x)/(1-x))).
a(n) = Sum_{k=0..n} 3^k * k! * A111594(n,k).
a(n) ~ sqrt(Pi) * 2^(5/2) * (exp(2/3) + 1)^(n-1) * n^(n + 1/2) / (3 * exp(n - 2/3) * (exp(2/3) - 1)^(n+1)). - Vaclav Kotesovec, Feb 04 2026
MATHEMATICA
nmax = 20; CoefficientList[Series[1/(1 - (3/2) * Log[(1+x)/(1-x)]), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Feb 04 2026 *)
PROG
(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(1/(1-3*atanh(x))))
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Seiichi Manyama, Jun 30 2025
STATUS
approved
