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 A194205 #9 Nov 12 2017 02:52:49 %S A194205 0,1,2,3,5,7,10,13,17,21,26,32,38,44,51,58,65,73,82,91,100,110,121, %T A194205 132,144,157,170,183,197,212,227,242,258,274,291,309,327,346,365,384, %U A194205 404,424,444,465,486,508,531,554,577,601,626,651,676,702,729,756 %N A194205 Partial sums of A194204. %H A194205 G. C. Greubel, <a href="/A194205/b194205.txt">Table of n, a(n) for n = 1..1000</a> %t A194205 r = E/2; %t A194205 a[n_] := Floor[Sum[FractionalPart[k*r], {k, 1, n}]] %t A194205 Table[a[n], {n, 1, 90}] (* A194204 *) %t A194205 s[n_] := Sum[a[k], {k, 1, n}] %t A194205 Table[s[n], {n, 1, 100}] (* A194205 *) %Y A194205 Cf. A194204. %K A194205 nonn %O A194205 1,3 %A A194205 _Clark Kimberling_, Aug 19 2011