OFFSET
1,2
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 1..328
David H. Bailey, Jonathan M. Borwein, David Broadhurst and M. L. Glasser, Elliptic integral evaluations of Bessel moments, arXiv:0801.0891
FORMULA
Let h_n = Sum_{ j=1..n } binomial(n,j)^2*binomial(2*j,j)*Sum_{ i=0..j-1 } 2/(n-i). Then a(n) = n!*h_n/4.
a(n) ~ n! * log(3) * 3^(2*n + 3/2) / (8*Pi*n). - Vaclav Kotesovec, Oct 06 2019
MAPLE
h := n-> add(binomial(n, j)^2*binomial(2*j, j)*add( 2/(n-i), i=0..j-1), j=1..n); [seq(n!*h(n)/4, n=1..30)];
MATHEMATICA
h[n_] := Sum[Binomial[n, j]^2*Binomial[2*j, j]*Sum[2/(n-i), {i, 0, j-1}], {j, 1, n}]; a[n_] := n!*h[n]/4; (* Jean-François Alcover, May 31 2016 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jan 20 2008, Jan 25 2008
STATUS
approved