This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A308226 #16 May 22 2019 08:47:05 %S A308226 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, %T A308226 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, %U A308226 7,2,5,8,5,0,7,0,4,4,5,5,4,2,1,0,0,4,1,7 %N A308226 A continued fraction transformation of Euler-Mascheroni constant. %C A308226 This number has the continued fraction which is the decimal expansion of Euler-Mascheroni constant. %e A308226 Equals 0.1945474448030236589478037026913009... %p A308226 with(numtheory): P:=proc(q) local a,b,n: a:=evalf(gamma,q): b:=[]: %p A308226 while a>0 do b:=[op(b),trunc(a)]: a:=evalf(10*(a-trunc(a)),q): od: %p A308226 a:=b[nops(b)]: for n from nops(b)-1 by -1 to 1 do a:=1/a+b[n]: %p A308226 od: print(evalf(a,q)); end: P(200): %Y A308226 Cf. A001620, A094964, A094965. %K A308226 base,nonn,cons,easy %O A308226 0,2 %A A308226 _Paolo P. Lava_, May 16 2019