OFFSET
0,3
LINKS
Robert Israel, Table of n, a(n) for n = 0..1200
FORMULA
G.f.: g^3 * (g-1)/(3-2*g)^2 where g=1+x*g^3.
G.f.: g/((1-g)^2 * (1-3*g)^2) where g*(1-g)^2 = x.
a(n) = Sum_{k=0..n-1} binomial(3*k+1+l,k) * binomial(3*n-3*k-l,n-k-1) for every real number l.
a(n) = Sum_{k=0..n-1} 2^(n-k-1) * binomial(3*n+2,k).
a(n) = Sum_{k=0..n-1} 3^(n-k-1) * binomial(2*n+k+2,k).
From Seiichi Manyama, May 06 2026: (Start)
G.f.: x*(B(x)/x)^2 where B(x) is the g.f. of A025174.
a(n+1) = (1/n) * Sum_{k=0..n-1} (k+1) * (3*k+10) * 2^k * binomial(3*n+5,n-1-k) for n > 0.
a(n+1) = (1/n) * Sum_{k=0..n-1} (k+1) * (2*k+10) * 3^k * binomial(3*n+3-k,n-1-k) for n > 0. (End)
D-finite with recurrence: 243*(3*n + 5)*(3*n + 4)*a(n) - 9*(153*n^2 + 756*n + 944)*a(n + 1) + 6*(44*n^2 + 279*n + 444)*a(n + 2) - 8*(n + 4)*(2*n + 7)*a(n + 3) = 0. - Robert Israel, May 06 2026
MAPLE
f:= gfun:-rectoproc({243*(3*n + 5)*(3*n + 4)*a(n) - 9*(153*n^2 + 756*n + 944)*a(n + 1) + 6*(44*n^2 + 279*n + 444)*a(n + 2) - 8*(n + 4)*(2*n + 7)*a(n + 3), a(0) = 0, a(1) = 1, a(2) = 10}, a(n), remember):
map(f, [0..30]); # Robert Israel, May 06 2026
PROG
(PARI) a(n) = sum(k=0, n-1, binomial(3*k+1, k)*binomial(3*n-3*k, n-k-1));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jul 27 2025
STATUS
approved
