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 A122250 #6 May 15 2017 03:07:08
%S A122250 0,1,3,7,12,18,26,35,45,58,72,87,104,122,141,162,184,207,233,260,288,
%T A122250 318,349,381,415,450,486,526,567,609,653,698,744,792,841,891,944,998,
%U A122250 1053,1110,1168
%N A122250 Partial sums of A004128.
%H A122250 G. C. Greubel, <a href="/A122250/b122250.txt">Table of n, a(n) for n = 0..1000</a>
%F A122250 G.f.: (1/(1-x))*Sum{k=0..infinity} ( x^(3^k)/((1-x)*(1-x^(3^k))) ).
%F A122250 a(n) = Sum_{j=0..n} ( Sum_{k=0..j} floor(j/3^k) ).
%t A122250 Table[Sum[Sum[Floor[3*j/3^k], {k, 1, j}], {j, 0, n}], {n, 0, 50}] (* _G. C. Greubel_, May 14 2017 *)
%o A122250 (PARI) for(n=0,50, print1(sum(j=0,n, sum(k=0,j, floor(j/3^k))), ", ")) \\ _G. C. Greubel_, May 14 2017
%K A122250 easy,nonn
%O A122250 0,3
%A A122250 _Paul Barry_, Aug 27 2006