A308226 A continued fraction transformation of Euler-Mascheroni constant.
1, 9, 4, 5, 4, 7, 4, 4, 4, 8, 0, 3, 0, 2, 3, 6, 5, 8, 9, 4, 7, 8, 0, 3, 7, 0, 2, 6, 9, 1, 3, 0, 0, 9, 7, 9, 2, 4, 8, 1, 6, 8, 1, 4, 0, 2, 6, 0, 6, 1, 3, 4, 1, 6, 6, 6, 8, 2, 3, 5, 4, 4, 1, 7, 6, 9, 0, 9, 7, 2, 5, 8, 5, 0, 7, 0, 4, 4, 5, 5, 4, 2, 1, 0, 0, 4, 1, 7
Offset: 0
Examples
Equals 0.1945474448030236589478037026913009...
Programs
-
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):
Comments