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 A078428 #15 Dec 13 2018 12:40:55 %S A078428 1,1,1,2,3,3,3,3,4,4,6,6,6,6,6,7,7,7,9,10,10,10,10,10,11,11,11,11,13, %T A078428 13,15,15,15,15,15,16,16,16,16,16,18,18,18,20,21,21,21,21,22,22,22,22, %U A078428 22,22,24,24,24,24,26,26,28,28,28,29,29,29,29,29,29,29,31,31,31,31,31,33 %N A078428 Partial sums of A035187. %H A078428 M. Baake, <a href="http://www.mathematik.uni-bielefeld.de/baake/preprints.html">Algebra, Combinatorics and Number Theory</a> %H A078428 M. Baake and R. V. Moody, <a href="https://arxiv.org/abs/math/9904028">Similarity submodules and root systems in four dimensions</a>, arXiv:math/9904028 [math.MG], 1999; Canad. J. Math. 51 (1999), 1258-1276. %F A078428 a(n) = Sum_{k=1..n} A035187(k). %F A078428 a(n) is asymptotic to c*n where c=2*log(tau)/sqrt(5) and tau=(1+sqrt(5))/2 %t A078428 Array[DivisorSum[#, KroneckerSymbol[5, #]&]&, 76] // Accumulate (* _Jean-François Alcover_, Dec 13 2018 *) %K A078428 nonn %O A078428 0,4 %A A078428 _Benoit Cloitre_, Dec 29 2002