login
Positions of 0's in binary expansion of Pi/4.
3

%I #15 Nov 18 2018 10:06:27

%S 3,4,6,7,9,10,11,12,19,22,24,26,28,29,30,32,33,34,36,37,38,39,41,44,

%T 46,47,48,51,52,53,54,56,57,58,61,63,64,67,68,69,71,72,75,76,77,80,81,

%U 84,85,86,88,90,91,92,94,98,99,100,101,102,103,104,107,111,112,113,114,115,119,120,123,125,126,127,129,130,132,134,135,137

%N Positions of 0's in binary expansion of Pi/4.

%C Numbers not in A004711.

%t Flatten[Position[RealDigits[Pi/4, 2, 200][[1]], 0]] (* _Alonso del Arte_, Oct 11 2018, after _Harvey P. Dale_ *)

%o (PARI) default(realprecision, 100); v = select(x->(x==0), binary(Pi/4)[2], 1) \\ _Michel Marcus_, Oct 12 2018

%Y Cf. A004601, A004711, A320301, A320302.

%K nonn,base

%O 1,1

%A _Jack Zhang_, Oct 10 2018