A260701 a(n) = (-3*(-1)^n + Sum_{k>=0} A000108(k)*k^n/6^k)/sqrt(3), where A000108 are Catalan numbers.

-1, 2, -1, 5, 20, 197, 2219, 30620, 496565, 9265037, 195535514, 4605925535, 119796721835, 3410051954402, 105449267146859, 3520120318516625, 126168879827914580, 4832661370036811417, 197001989531658791879, 8515772839409988885140, 389080859811496699020425

Offset

0,2

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..100

Formula

Sum_{k >= 0} A000108(k)*k^n/6^k = a(n)*sqrt(3) + 3*(-1)^n.

a(n) ~ sqrt(2) * n^(n-1) / (sqrt(3) * exp(n) * log(3/2)^(n-1/2)). - Vaclav Kotesovec, Nov 17 2015

E.g.f.: -sqrt( exp(-x) * (-2+3*exp(-x)) ). - Seiichi Manyama, Oct 21 2021

Example

For n = 5, Sum_{k>=0} A000108(k)*k^5/6^k = 197*sqrt(3) - 3, so a(5) = 197.

Mathematica

Table[(-3 (-1)^n + Sum[CatalanNumber[k] k^n/6^k, {k, 0, Infinity}])/Sqrt[3], {n, 0, 20}]

Prog

(PARI) vector(20, n, n--; round((suminf(k=0, binomial(2*k, k)/(k+1)*k^n/6^k) - 3*(-1)^n)/sqrt(3))) \\ Altug Alkan, Nov 16 2015
(PARI) N=20; x='x+O('x^N); Vec(serlaplace(-sqrt(exp(-x)*(-2+3*exp(-x))))) \\ Seiichi Manyama, Oct 21 2021

Crossrefs

Cf. A000108, A260902, A348468.

Sequence in context: A254677 A184298 A349852 * A184300 A317390 A370163

Adjacent sequences: A260698 A260699 A260700 * A260702 A260703 A260704

Keyword

sign

Author

Vladimir Reshetnikov, Nov 16 2015

Status

approved