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 A086399 #10 Apr 02 2021 10:41:27 %S A086399 4,2,6,8,2,8,4,6,2,6,4,8,2,0,2,8,8,4,6,0,8,2,0,4,4,4,2,0,8,6,4,0,6,2, %T A086399 8,6,2,0,8,8,6,2,8,0,4,8,2,4,2,0,6,8,2,4,8,0,8,6,2,8,2,0,6,6,4,0,8,4, %U A086399 4,6,0,0,8,2,2,2,4,0,8,2,8,4,8,4,0,2,8,4,0,2,0,8,2,0,6,4,4,6,2,2,4,8,4,0,8 %N A086399 Even digits of Pi. %C A086399 In the early stages up to 100000 there are a few more odd digits in Pi than even. %t A086399 Select[RealDigits[Pi,10,200][[1]],EvenQ] (* _Harvey P. Dale_, Apr 05 2016 *) %o A086399 (PARI) evenpi(n) = { default(realprecision,20000); p = Pi/10; s = 0; default(realprecision,28); for(x=1,n, d = p*10; d1=floor(d); if(d1%2==0,print1(d1","); s++; ); p = frac(d); ); print(); print(s) } %o A086399 (Python) %o A086399 from sympy import S %o A086399 def auptodigs(lim): %o A086399 return [int(d) for d in str(S.Pi.n(lim+1)) if d not in ".13579"] %o A086399 print(auptodigs(197)) # _Michael S. Branicky_, Apr 02 2021 %K A086399 nonn,base %O A086399 1,1 %A A086399 _Cino Hilliard_, Sep 06 2003