A178709 Position of start of first appearance of n consecutive 1's in the binary expansion of Pi.
3, 11, 11, 11, 11, 11, 451, 645, 645, 645, 5212, 18123, 18123, 58276, 58276, 80697, 80697, 80697, 1146746, 1962901, 3296306, 9772065, 9772065, 9772065, 47536571, 169338693, 169338693, 207861698, 207861698, 207861698
Offset: 1
Examples
6 consecutive 1's are first found beginning at the 11th position in Pi's binary expansion, so the sixth term in this sequence is 11.
Programs
-
Mathematica
pib = ToString@ FromDigits[ RealDigits[Pi - 3, 2, 2^28][[1]]]; f[n_] := 2 + StringPosition[ pib, ToString[(10^n - 1)/9], 1][[1, 1]]; Array[f, 30] (* Robert G. Wilson v, Jun 09 2010 *)
Extensions
a(14)-a(30) from Robert G. Wilson v, Jun 09 2010
Comments