editing
approved
editing
approved
a(n) ~ sqrt((1/8 + cos(arccos(sqrt(37)/8)/3)/sqrt(37))/(Pi*n)) / (-2/3 + sqrt(35/18)*cos(arccos(-4537/(560*sqrt(70)))/3))^n. - Vaclav Kotesovec, May 04 2024
Table[SeriesCoefficient[1/((1-x)*(1-x-x^2))^n, {x, 0, n}], {n, 0, 20}] (* Vaclav Kotesovec, May 04 2024 *)
approved
editing
editing
approved
D-finite with recurrence +575*n*(n-1)*(n-2)*a(n) +40*(n-1)*(n-2)*(125*n-178)*a(n-1) -16*(n-2)*(3272*n^2-5536*n+75)*a(n-2) +8*(-22112*n^3+169392*n^2-450082*n+415827)*a(n-3) +1344*(96*n^3-1328*n^2+5794*n-8139)*a(n-4) +3072*(4*n-15)*(2*n-9)*(4*n-17)*a(n-5)=0. - R. J. Mathar, May 02 2024
A372233 := proc(n)
add(binomial(n+k-1, k) * binomial(3*n-k-1, n-2*k), k=0..floor(n/2));
end proc:
seq(A372233(n), n=0..50) ; # R. J. Mathar, May 02 2024
approved
editing
proposed
approved
editing
proposed
a(n) = Sum_{k=0..floor(n/2)} binomial(n+k-1,k) * binomial(3*n-k-1,n-2*k).