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 A200247 #8 Jun 04 2012 16:03:44 %S A200247 1,1,1,2,3,4,4,5,5,5,6,7,8,8,9,9,10,11,12,12,13,14,14,14,15,15,16,17, %T A200247 18,18,19,20,21,21,21,22,23,23,24,25,26,27,28,29,29,30,31,32,33,34,35, %U A200247 36,37,38,38,38,38,39,39,39,40,40,41,41,42,42,43,43,43 %N A200247 Partial sums of A200246. %H A200247 T. D. Noe, <a href="/A200247/b200247.txt">Table of n, a(n) for n = 1..1000</a> %t A200247 Accumulate[If[OddQ[Total[IntegerDigits[#,2]]],1,0]&/@Prime[Range[90]]] (* _Harvey P. Dale_, Jun 04 2012 *) %K A200247 nonn %O A200247 1,4 %A A200247 _N. J. A. Sloane_, Nov 15 2011