|
|
A372184
|
|
a(n) = 2^(1-3*n)*((2*n)!)^2/n.
|
|
0
|
|
|
1, 9, 675, 198450, 160744500, 291751267500, 1035425248357500, 6523179064652250000, 67867154988642009000000, 1102501932790489436205000000, 26741184379833321275152275000000, 933641711437500579000666529350000000, 45515033432578153226282493305812500000000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = Product_{k=1..n-1} A339483(k).
a(n) = (2^n*n*2*Zeta_k(1-2*n)*Pi^(4*n))/(D_k^(2*n-1)*sqrt(D_k)*Zeta_k(2*n)) where Zeta_k() is the Dedekind zeta function over a real quadratic field with fundamental discriminant D_k = A003658(m) for some m > 1.
a(n) = 8^(1-n)*Integral_{x>=0} ( x^(2*n-(1/2))*BesselK(1, 2*sqrt(x)) ), where BesselK(m, ...) is the modified Bessel function K_m(...) of the first kind.
Sum_{n>=1} (x^(n-1)/a(n)) = (BesselI(1, 2*2^(3/4)*x^(1/4)) - BesselJ(1, 2*2^(3/4)*x^(1/4)))/(4*2^(1/4)*x^(3/4))
= (d/dx)((-2 + BesselI(0, 2*2^(3/4)*x^(1/4)) + BesselJ(0, 2*2^(3/4)*x^(1/4)))/4), where BesselI(m, ...) is the modified Bessel function I_m(...) of the first kind and BesselJ(m, ...) is the Bessel function J_m(...) of the first kind.
D-finite with recurrence 2*a(n) -n*(n-1)*(-1+2*n)^2*a(n-1)=0. - R. J. Mathar, May 20 2024
|
|
PROG
|
(PARI) a(n) = 2^(1-3*n)*(2*n)!^2/n
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|