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 A293688 #18 Mar 03 2019 08:41:38 %S A293688 0,2,3,8,15,18,28,32,45,60,66,84,104,112,135,144,170,198,209,240,252, %T A293688 286,322,336,375,416,432,476,493,540,589,608,660,714,735,792,814,874, %U A293688 936,960,1025,1050,1118,1188,1215,1288,1363,1392,1470,1500,1581,1664,1696,1782,1815 %N A293688 Partial sums of A002251. %H A293688 Michael De Vlieger, <a href="/A293688/b293688.txt">Table of n, a(n) for n = 0..10000</a> %F A293688 a(n) = (n+1)*A005206(n) where A005206 is the Hofstadter G-sequence. [Apparently this is a conjecture, rather than a theorem. - _N. J. A. Sloane_, Mar 03 2019] %F A293688 a(n) = Sum_{k=0..n} A002251(k). - _Michel Marcus_, Nov 13 2017 %t A293688 With[{n = 34}, Accumulate@ Prepend[Take[Values@ #, LengthWhile[#, # == 1 &] &@ Differences@ Keys@ #], 0] &@ Sort@ Flatten@ Map[{#1 -> #2, #2 -> #1} & @@ # &, Transpose@ {Array[Floor[# GoldenRatio] &, n], Array[Floor[# GoldenRatio^2] &, n]}]] (* _Michael De Vlieger_, Nov 14 2017 *) %Y A293688 Cf. A002251, A005206. %K A293688 nonn %O A293688 0,2 %A A293688 _Enrique Navarrete_, Oct 14 2017 %E A293688 Offset changed to 0 by _Michel Marcus_, Nov 13 2017