OFFSET
0,4
FORMULA
a(n) = Sum_{k=0..floor(n/3)} (3*k)!/k!^3 * binomial(3*k,k) * binomial(n,3*k).
From Vaclav Kotesovec, Mar 22 2023: (Start)
Recurrence: 2*n^3*(2*n - 3)*a(n) = 2*(10*n^4 - 32*n^3 + 38*n^2 - 22*n + 5)*a(n-1) - 2*(n-1)*(2*n - 3)*(10*n^2 - 24*n + 17)*a(n-2) + (n-2)*(n-1)*(769*n^2 - 2331*n + 1594)*a(n-3) - 2*(n-3)*(n-2)*(n-1)*(739*n - 1481)*a(n-4) + 733*(n-4)*(n-3)*(n-2)*(n-1)*a(n-5).
a(n) ~ sqrt(733/108 + 1/2^(2/3) + 9/2^(4/3)) * (1 + 9/2^(2/3))^n / (2 * Pi^(3/2) * n^(3/2)). (End)
MATHEMATICA
Table[Sum[(3*k)!/k!^3 * Binomial[3*k, k] * Binomial[n, 3*k], {k, 0, n/3}], {n, 0, 25}] (* Vaclav Kotesovec, Mar 22 2023 *)
PROG
(PARI) a(n) = sum(k=0, n\3, (3*k)!/k!^3*binomial(3*k, k)*binomial(n, 3*k));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Mar 20 2023
STATUS
approved