OFFSET
0,1
COMMENTS
Continued fraction of the constant in A188722.
MAPLE
Digits := 100 ;
(Pi+sqrt(4+Pi^2))/2 ;
evalf(%) ;
numtheory[cfrac](%, 40, 'quotients') ; # R. J. Mathar, Apr 11 2011
MATHEMATICA
r = Pi; t = (r + (4 + r^2)^(1/2))/2; FullSimplify[t]
N[t, 130]
RealDigits[N[t, 130]][[1]]
ContinuedFraction[t, 120]
CROSSREFS
KEYWORD
nonn,cofr
AUTHOR
Clark Kimberling, Apr 09 2011
EXTENSIONS
Offset changed by Andrew Howroyd, Jul 07 2024
STATUS
approved