|
%I #8 Apr 10 2016 06:05:40
%S 1,1,1,4,4,9,3,6,2,2,5,2,8,8,2,0,2,1,6,0,8,0,9,9,5,0,6,9,9,6,0,6,1,3,
%T 5,3,2,0,7,5,1,9,1,5,4,3,6,0,7,7,9,0,2,4,3,7,8,8,1,9,1,4,2,2,6,3,2,8,
%U 0,4,7,9,8,8,7,1,4,2,7,7,8,8,8,7,1,9,7,1,5,1,0,0,5
%N Decimal expansion of the generalized hypergeometric function 3F2(1/2,1/2,3/2; 1,1;x) at x=1/4.
%C Multiplication with Pi^2/8 gives 1.37495.. = integral_{x=0..infinity} x*I_0(x)*K_0(x)*K_1(x) dx, where I and K are Modified Bessel Functions
%e 1.1144936225288202160...
%t RealDigits[HypergeometricPFQ[{1/2, 1/2, 3/2}, {1, 1}, 1/4], 10, 120][[1]] (* _Vaclav Kotesovec_, Apr 10 2016 *)
%t RealDigits[4*MeijerG[{{1, 1}, {1}}, {{1/2, 1/2, 3/2}, {}}, 1/4] / Pi^(5/2), 10, 120][[1]] (* _Vaclav Kotesovec_, Apr 10 2016 *)
%K cons,nonn
%O 1,4
%A _R. J. Mathar_, Oct 19 2015
|
