login
Search: a370101 -id:a370101
     Sort: relevance | references | number | modified | created      Format: long | short | data
a(n) = Sum_{k=0..n} binomial(4*n,k) * binomial(5*n-k-1,n-k).
+10
5
1, 8, 128, 2312, 44032, 864008, 17282432, 350353928, 7172939776, 147972367880, 3070951360128, 64044689834760, 1341056098444288, 28176478479561992, 593725756425591680, 12542160174109922312, 265525958014053580800, 5632170795392966388744
OFFSET
0,2
FORMULA
a(n) = [x^n] ( (1+x)^4/(1-x)^4 )^n.
The g.f. exp( Sum_{k>=1} a(k) * x^k/k ) has integer coefficients and equals (1/x) * Series_Reversion( x*(1-x)^4/(1+x)^4 ). See A365847.
From Peter Bala, Jul 20 2024: (Start)
a(n) = binomial(5*n-1, n)*hypergeom([-n, -4*n], [1 - 5*n], -1).
For n >=1, a(n) = (4/3) * [x^n] S(x)^(3*n) = (4/5) * [x^n] (1/S(-x))^(5*n), where S(x) = (1 - x - sqrt(1 - 6*x + x^2))/(2*x) is the o.g.f. of the sequence of large Schröder numbers A006318.
n*(4*n - 3)*(2*n - 1)*(4*n - 1)*(85*n^4 - 510*n^3 + 1138*n^2 - 1119*n + 409)*a(n) = 2*(29665*n^8 - 237320*n^7 + 794282*n^6 - 1443212*n^5 + 1544750*n^4 - 987560*n^3 + 363568*n^2 - 69168*n + 5040)*a(n-1) + (n - 2)*(4*n - 7)*(2*n - 3)*(4*n - 5)*(85*n^4 - 170*n^3 + 118*n^2 - 33*n + 3)*a(n-2) with a(0) = 1 and a(1) = 8.
The Gauss congruences hold: a(n*p^r) == a(n*p^(r-1)) (mod p^r) for all primes p and positive integers n and r.
Conjecture: the supercongruences a(n*p^r) == a(n*p^(r-1)) (mod p^(3*r)) hold for all primes p >= 5 and positive integers n and r. (End)
a(n) ~ (349 + 85*sqrt(17))^n / (17^(1/4) * sqrt(Pi*n) * 2^(5*n - 1/2)). - Vaclav Kotesovec, Aug 08 2024
MAPLE
seq(simplify(binomial(5*n-1, n)*hypergeom([-n, -4*n], [1 - 5*n], -1)), n = 0..20); # Peter Bala, Jul 29 2024
PROG
(PARI) a(n) = sum(k=0, n, binomial(4*n, k)*binomial(5*n-k-1, n-k));
KEYWORD
nonn,easy
AUTHOR
Seiichi Manyama, Feb 10 2024
STATUS
approved
a(n) = Sum_{k=0..n} (-1)^k * binomial(2*n+k-1,k) * binomial(4*n-k-1,n-k).
+10
3
1, 1, 7, 28, 151, 751, 3976, 20924, 112023, 602182, 3260257, 17724928, 96766072, 529977917, 2910984412, 16027963528, 88440034711, 488918693466, 2707393587802, 15014647096172, 83380131228401, 463593653171495, 2580426581343200, 14377474236172320
OFFSET
0,3
FORMULA
a(n) = [x^n] 1/( (1+x)^2 * (1-x)^3 )^n.
The g.f. exp( Sum_{k>=1} a(k) * x^k/k ) has integer coefficients and equals (1/x) * Series_Reversion( x*(1+x)^2*(1-x)^3 ). See A365854.
a(n) = Sum_{k=0..floor(n/2)} binomial(3*n+k-1,k) * binomial(n,n-2*k).
a(n) = Sum_{k=0..floor(n/2)} binomial(2*n+k-1,k) * binomial(2*n-2*k-1,n-2*k).
PROG
(PARI) a(n) = sum(k=0, n, (-1)^k*binomial(2*n+k-1, k)*binomial(4*n-k-1, n-k));
(PARI) a(n, s=2, t=3, u=1) = sum(k=0, n\s, binomial(t*n+k-1, k)*binomial(u*n, n-s*k));
(PARI) a(n, s=2, t=2, u=1) = sum(k=0, n\s, binomial(t*n+k-1, k)*binomial((u+1)*n-s*k-1, n-s*k));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Feb 10 2024
STATUS
approved
a(n) = Sum_{k=0..n} binomial(4*n,k) * binomial(2*n-k-1,n-k).
+10
2
1, 5, 47, 500, 5615, 65005, 767396, 9183144, 110995695, 1351922495, 16566597047, 204010570296, 2522556212228, 31298015910140, 389458822888280, 4858487926378000, 60742838865326319, 760901358321592611, 9547848458062427405, 119990407515367475700
OFFSET
0,2
FORMULA
a(n) = [x^n] ( (1+x)^4/(1-x) )^n.
The g.f. exp( Sum_{k>=1} a(k) * x^k/k ) has integer coefficients and equals (1/x) * Series_Reversion( x*(1-x)/(1+x)^4 ). See A365754.
From Peter Bala, Jun 08 2024: (Start)
2*n*(n - 1)*(2*n - 1)*(51*n^2 - 144*n + 100)*a(n) = -(n - 1)*(5457*n^4 - 20865*n^3 + 26366*n^2 - 12172*n + 1560)*a(n-1) + 64*(2*n - 3)*(4*n - 5)*(4*n - 7)*(51*n^2 - 42*n + 7)*a(n-2) with a(0) = 1 and a(1) = 5.
The Gauss congruences hold: a(n*p^r) == a(n*p^(r-1)) (mod p^r) for all primes p and positive integers n and r.
Conjecture: the supercongruences a(n*p^r) == a(n*p^(r-1)) (mod p^(3*r)) hold for all primes p >= 5 and positive integers n and r. See A352373 for a more general conjecture. (End)
a(n) ~ sqrt(3 + 5/sqrt(17)) * (51*sqrt(17) - 107)^n / (sqrt(Pi*n) * 2^(3*n + 3/2)). - Vaclav Kotesovec, Jun 12 2024
MATHEMATICA
Table[Sum[Binomial[4*n, k]*Binomial[2*n - k - 1, n - k], {k, 0, n}], {n, 0, 20}] (* Vaclav Kotesovec, Jun 12 2024 *)
PROG
(PARI) a(n) = sum(k=0, n, binomial(4*n, k)*binomial(2*n-k-1, n-k));
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Seiichi Manyama, Feb 10 2024
STATUS
approved

Search completed in 0.004 seconds