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 A085192 #10 Mar 02 2016 11:31:51
%S A085192 2,8,2,30,2,6,2,4,114,2,6,2,4,18,2,6,2,4,10,2,4,8,442,2,6,2,4,18,2,6,
%T A085192 2,4,10,2,4,8,58,2,6,2,4,18,2,6,2,4,10,2,4,8,26,2,6,2,4,10,2,4,8,18,2,
%U A085192 4,8,16,1738,2,6,2,4,18,2,6,2,4,10,2,4,8,58,2,6,2,4,18,2,6,2,4,10,2,4,8,26
%N A085192 First differences of A014486.
%H A085192 Alois P. Heinz, <a href="/A085192/b085192.txt">Table of n, a(n) for n = 0..23712</a>
%F A085192 a(n) = A014486(n+1) - A014486(n).
%t A085192 okQ[n_] := Module[{bb = IntegerDigits[n, 2], cnt=0}, For[k=1, k <= Length[ bb], k++, cnt = cnt + If[bb[[k]]==1, 1, -1]; okQ[0] = True; If[cnt < 0, Return[False]]]; cnt==0]; Select[Range[0, 10^4], okQ] // Differences (* _Jean-François Alcover_, Mar 02 2016 *)
%Y A085192 Repeating part: A085193.
%K A085192 nonn
%O A085192 0,1
%A A085192 _Antti Karttunen_, Jun 14 2003