%I #30 Sep 01 2021 01:40:46

%S 1,1,0,1,1,1,0,0,0,1,0,0,0,1,1,0,1,0,1,0,0,0,0,1,0,1,1,1,1,0,1,0,0,1,

%T 1,1,0,0,1,1,0,1,1,1,0,1,0,1,0,1,0,1,0,0,1,1,0,0,0,1,1,1,0,0,0,1,1,0,

%U 0,0,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,0,1,1

%N Binary digits found in decimal expansion of Pi.

%C If Pi is normal then every possible string of 0's and 1's will appear in this sequence. - _Joshua Oliver_, Nov 27 2019

%H Jinyuan Wang, <a href="/A065828/b065828.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..7641 from Felix Fröhlich)

%e From _Felix Fröhlich_, Nov 27 2019: (Start)

%e The first of the following lines shows the decimal expansion of Pi and the second the expansion with all digits except 0 and 1 omitted, thus giving the terms of the sequence:

%e 3.1415926535897932384626433832795028841971693993751058209749445923078164062

%e 1 1 0 1 1 10 0 0 1 0

%e (End)

%t Select[ RealDigits[Pi, 10, 520][[1]], # < 2 &] (* _Robert G. Wilson v_, May 04 2009 *)

%o (PARI) my(d=digits(floor(Pi*10^400))); for(k=1, #d, if(d[k] < 2, print1(d[k], ", "))) \\ _Felix Fröhlich_, Nov 27 2019

%Y Cf. A000796, A011545, A011546, A055143, A065829-A065840.

%K nonn,base

%O 1

%A _Patrick De Geest_, Nov 24 2001

%E Offset changed to 1 by _Jinyuan Wang_, Aug 31 2021