OFFSET
0,1
COMMENTS
Special values of a sum of two hypergeometric functions of type 3F4.
In Maple notation:
a(n)=2^(3*n-1)*exp(-1)*((n!)^3*hypergeom([n+1,n+1,n+1],[1,1,3/2,2],1/4)+
2*(GAMMA(n+1/2)/sqrt(Pi))^3*hypergeom([n+1/2,n+1/2,n+1/2],[1/2,1/2,1/2,3/2],1/4)), n=1,2... .
MATHEMATICA
Round[Table[(2^(-1 + 3*n)*((2*Gamma[1/2 + n]^3 * HypergeometricPFQ[{1/2 + n, 1/2 + n, 1/2 + n}, {1/2, 1/2, 1/2, 3/2}, 1/4])/Pi^(3/2) + n!^3*HypergeometricPFQ[{1 + n, 1 + n, 1 + n}, {1, 1, 3/2, 2}, 1/4]))/E, {n, 1, 12}]] (* Vaclav Kotesovec, Jun 08 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Karol A. Penson, Mar 03 2009
STATUS
approved