%I A039624
%S A039624 4,6,8,16,30,32,6356,6358,6360,6362,6364,6368,6370,6372,6374,6384,6430,
%T A039624 6442,6444,6446,6450,6464,6468,6470,6508,6514,6524,6526,6562,6564,6568,
%U A039624 6570,6572,6586,6588,6688,6690,6692,6694,6806,6866,6916,6918,6920,6922
%N A039624 Numbers n such that there are equal numbers of 0's and 1's in first n 
               digits of binary representation of Pi.
%C A039624 Number of terms >= 10^k: 3, 6, 6, 129, 599, 777, ..., . [From Robert 
               G. Wilson v (rgwv(AT)rgwv.com), Apr 13 2009]
%H A039624 Robert G. Wilson v, <a href="b039624.txt">Table of n, a(n) for n = 1..777 
               </a>.
%t A039624 pir = RealDigits[Pi, 2, 10^6][[1]]; fQ[n_] := Count[ Take[ pir, 2n], 
               1] == n; 2 Select[ Range@ 3461, fQ@# &] [From Robert G. Wilson v 
               (rgwv(AT)rgwv.com), Apr 13 2009]
%Y A039624 Sequence in context: A079250 A055397 A049421 this_sequence A083166 A022599 
               A112160
%Y A039624 Adjacent sequences: A039621 A039622 A039623 this_sequence A039625 A039626 
               A039627
%K A039624 base,nonn
%O A039624 1,1
%A A039624 Brian L. Galebach (sequence(AT)ProbabilitySports.com)
%E A039624 More terms from Alex Healy (ahealy(AT)fas.harvard.edu), Jun 22 2001