OFFSET
0,2
COMMENTS
This number has the continued fraction which is the decimal expansion of Euler-Mascheroni constant.
EXAMPLE
Equals 0.1945474448030236589478037026913009...
MAPLE
with(numtheory): P:=proc(q) local a, b, n: a:=evalf(gamma, q): b:=[]:
while a>0 do b:=[op(b), trunc(a)]: a:=evalf(10*(a-trunc(a)), q): od:
a:=b[nops(b)]: for n from nops(b)-1 by -1 to 1 do a:=1/a+b[n]:
od: print(evalf(a, q)); end: P(200):
CROSSREFS
KEYWORD
AUTHOR
Paolo P. Lava, May 16 2019
STATUS
approved