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 A182093 #21 Feb 27 2017 21:19:11
%S A182093 0,1,2,2,3,2,2,3,4,2,1,2,2,3,4,4,5,2,0,1,0,2,3,2,2,3,4,4,5,4,4,5,6,2,
%T A182093 -1,0,-2,1,2,0,-1,2,4,3,4,2,1,2,2,3,4,4,5,4,4,5,6,4,3,4,4,5,6,6,7,2,
%U A182093 -2,-1,-4,0,1,-2,-4,1,4,2,3,0,-2,-1,-2,2,5
%N A182093 Partial sums of A005590.
%C A182093 a(n+1) = a(n) + A005590(n+1).
%H A182093 Reinhard Zumkeller, <a href="/A182093/b182093.txt">Table of n, a(n) for n = 0..10000</a>
%F A182093 a(2^n) = n + 1.
%F A182093 G.f.: (x/(1 - x))*Product_{k>=0} (1 + x^(2^k) - x^(2^(k+1))). - _Ilya Gutkovskiy_, Feb 27 2017
%t A182093 a[0] = 0; a[1] = 1; a[n_] := a[n] = If[OddQ@ n, a[(n - 1)/2 + 1] - a[(n - 1)/2], a[n/2]]; Accumulate@ Table[a@ n, {n, 0, 104}] (* after _Jean-François Alcover_ at A005590, or *)
%t A182093 Table[SeriesCoefficient[(x/(1 - x)) Product[(1 + x^(2^k) - x^(2^(k + 1))), {k, 0, n}], {x, 0, n}], {n, 0, 70}] (* _Michael De Vlieger_, Feb 27 2017 *)
%o A182093 (Haskell)
%o A182093 a182093 n = a182093_list !! n
%o A182093 a182093_list = scanl1 (+) a005590_list
%Y A182093 Cf. A005590.
%K A182093 sign,look
%O A182093 0,3
%A A182093 _Reinhard Zumkeller_, Apr 11 2012