|
|
A176898
|
|
a(n) = binomial(6*n, 3*n)*binomial(3*n, n)/(2*(2*n+1)*binomial(2*n, n)).
|
|
2
|
|
|
5, 231, 14586, 1062347, 84021990, 7012604550, 607892634420, 54200780036595, 4938927219474990, 457909109348466930, 43057935618181929900, 4096531994713828810686, 393617202432246696493436, 38142088615983865845923052, 3723160004902167033863327592
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
During April 26-28, 2010, Zhi-Wei Sun introduced this new sequence and proved that a(n) = binomial(6n,3n)*binomial(3n,n)/(2*(2n+1)*binomial(2n,n)) is a positive integer for every n=1,2,3,... He also observed that a(n) is odd if and only if n is a power of two, and that 3a(n)=0 (mod 2n+3). By Stirling's formula, we have lim_n (8n*sqrt(n*Pi)a(n)/108^n) = 1. It is interesting to find a combinatorial interpretation or recursion for the sequence.
Zhi-Wei Sun formulated two conjectures concerning a(n) (see Conjectures 1.1 and 1.2 in Z.-W. Sun, "Products and sums divisible by central binomial coefficients" and Conjecture A89 in "Open conjectures on congruences"). The first conjecture states that Sum_{n=1..p-1} a(n)/(108^n) is congruent to 0 or -1 modulo a prime p > 3 depending on whether p is congruent to +-1 or +-5 modulo 12, respectively.
The second conjecture asks about an exact formula for a companion sequence of a(n). Both conjectures as well as many numerical congruences involving a(n) and (2n+1)a(n) were solved by Kh. Hessami Pilehrood and T. Hessami Pilehrood, see the link below. (End)
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1-6*s)/((12*s-1)*(8*s-2)) - 1/2, where x+(3*s-1)*(12*s-1)^2*s*(4*s-1)^2 = 0. - Mark van Hoeij, May 06 2013
a(n) ~ 2^(2*n-3) * 3^(3*n) / (sqrt(Pi) * n^(3/2)). - Vaclav Kotesovec, Jan 09 2023
a(n+1) = 6*(6*n + 1)*(6*n + 5)/((n + 1)*(2*n + 3))*a(n).
a(n) = (2^(2*n-1)) * Product_{1 <= i <= j <= 2*n-1} (2*i + j + 2)/(2*i + j - 1). Cf. A006013. (End)
|
|
EXAMPLE
|
For n=2 we have a(2) = binomial(12,6)*binomial(6,2)/(2*(2*2+1)*binomial(4,2)) = 231.
|
|
MAPLE
|
ogf := eval((1-6*s)/((12*s-1)*(8*s-2)) - 1/2, s=RootOf(x+(3*s-1)*(12*s-1)^2*s*(4*s-1)^2, s));
|
|
MATHEMATICA
|
S[n_]:=Binomial[6n, 3n]Binomial[3n, n]/(2(2n+1)Binomial[2n, n]) Table[S[n], {n, 1, 50}]
|
|
PROG
|
(Magma) [Binomial(6*n, 3*n)*Binomial(3*n, n)/(2*(2*n+1)*Binomial(2*n, n)): n in [1..15]]; // Vincenzo Librandi, Dec 02 2015
(PARI) a(n) = binomial(6*n, 3*n) * binomial(3*n, n) / (2*(2*n+1) * binomial(2*n, n)); \\ Indranil Ghosh, Mar 05 2017
(Python)
import math
f=math.factorial
def C(n, r): return f(n)/f(r)/f(n-r)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|