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 A030562 #6 Jul 10 2023 18:49:44 %S A030562 1,1,1,1,1,2,1,2,3,4,4,5,5,6,6,7,7,7,6,6,7,7,7,7,7,7,7,7,7,7,6,6,7,7, %T A030562 7,7,7,7,7,7,7,7,6,6,7,7,7,7,7,7,7,7,7,7,6,6,7,7,7,7,7,7,7,7,7,8,7,6, %U A030562 7,6,7,8,7,7,8,7,7,8,7,7,8,7,7,8,9,8,9,10,11 %N A030562 (# 1's)-(# 0's) in first n terms of A030548. %t A030562 Accumulate[Which[#==1,1,#==0,-1,True,0]&/@Flatten[IntegerDigits[Range[50],6]]] (* _Harvey P. Dale_, Jul 10 2023 *) %K A030562 nonn %O A030562 1,6 %A A030562 _Clark Kimberling_