This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A084185 #11 Mar 30 2018 08:12:23 %S A084185 1,1,3,8,1,3,17,8,14,4,1,19,3,18,17,8,62,51,14,6,4,1,42,80,19,3,41,18, %T A084185 40,17,31,8,57,62,128,51,69,20,14,6,104,4,111,66,1,96,42,146,80,50,19, %U A084185 118,3,77,41,126,18,98,40,17,75,33,31,453,8,57 %N A084185 First occurrence of binary n in the binary expansion of sqrt(2). %C A084185 a(n)=1 iff n in A084188. a(2^(n+1)+1) = A084187(n)-1. %H A084185 G. C. Greubel, <a href="/A084185/b084185.txt">Table of n, a(n) for n = 1..5000</a> %e A084185 The binary expansion of sqrt(2) is 1.0110101000001..(A004539) and binary(10)=1010 occurs first at index 4, so a(10)=4. %t A084185 With[{s2=RealDigits[Sqrt[2],2,1000][[1]],n2=IntegerDigits[n,2]}, Flatten[ Table[First[ Position[Partition[s2,Length[n2],1],n2]],{n,70}]]] (* _Harvey P. Dale_, Oct 11 2012 *) %Y A084185 Cf. A084186. %K A084185 nonn,base %O A084185 1,3 %A A084185 _Ralf Stephan_, May 18 2003