A086399 Even digits of Pi.

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, 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, 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

Offset: 1

Author

Cino Hilliard, Sep 06 2003

Keywords

• nonn
• base

Comments

In the early stages up to 100000 there are a few more odd digits in Pi than even.

Programs

Mathematica

Select[RealDigits[Pi,10,200][[1]],EvenQ] (* Harvey P. Dale, Apr 05 2016 *)

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) }

Python

from sympy import S
def auptodigs(lim):
  return [int(d) for d in str(S.Pi.n(lim+1)) if d not in ".13579"]
print(auptodigs(197)) # Michael S. Branicky, Apr 02 2021