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 A033149 #27 Aug 06 2025 11:19:29 %S A033149 2,4,9,8,11,69,24,14,139,52,22,161,10,199,337,79,163,176,384,614,183, %T A033149 651,137,480,250,862,554,618,287,300,1952,166,150,2038,560,483,1284, %U A033149 681,306,20,349,1130,2280,1884,1903,2564,4753,717,31,2610,568,248,2171 %N A033149 Position of first occurrence of n in the continued fraction for the Euler-Mascheroni constant (gamma). %C A033149 The smallest positive integers not appearing in the first 970,258,158 terms of the c.f. are 13161, 13295, 14734, 14970, 14971, 15795, 15985, 16011, 16110, ... - _Eric W. Weisstein_, Sep 21 2011 %H A033149 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Euler-MascheroniConstantContinuedFraction.html">Euler-Mascheroni Constant Continued Fraction</a> %F A033149 a(n) = A224847(n) + 1. %t A033149 With[{cf=ContinuedFraction[EulerGamma,5000]},Table[Position[cf,n,1,1],{n,60}]]//Flatten (* _Harvey P. Dale_, Aug 06 2025 *) %o A033149 (PARI) /* 15000 precision digits */ v=contfrac(Euler); a(n)=if(n<0,0,s=1; while(abs(n-component(v,s))>0,s++); s) %Y A033149 Cf. A001620, A002852, A032523. %Y A033149 Cf. A224847 (= a(n) -1). %K A033149 nonn,base %O A033149 1,1 %A A033149 _Eric W. Weisstein_ %E A033149 More terms from _Benoit Cloitre_, Oct 20 2002