OFFSET
1,3
FORMULA
Equals hypergeometric([1/2, 1], [2/3, 4/3], 4/27).
EXAMPLE
1.088300303254427561687202908353381908685907755580814880...
MATHEMATICA
s = Sum[(2 k)!/(3 k + 1)!, {k, 0, Infinity}]
d = N[s, 100]
First[RealDigits[d]]
N[HypergeometricPFQ[{1/2, 1}, {2/3, 4/3}, 4/27], 100]
PROG
(PARI) suminf(k=0, (2*k)!/(3*k + 1)!) \\ ~~~é
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, May 31 2024
STATUS
approved