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 A024570 #18 Jul 17 2019 04:43:23
%S A024570 1,5,6,8,19,20,23,24,25,30,31,33,62,63,66,67,68,76,77,79,80,81,85,86,
%T A024570 88,102,103,106,107,108,114,115,117,193,194,198,199,201,210,211,213,
%U A024570 214,215,220,221,223,244,245,248,249,250,257,258,260,261,262,266,267,269,281,282,285
%N A024570 a(n) = Sum_{k=1..n} [ 1/{k*r} ] where r = (1 + sqrt(5))/2 and {x} := x - [ x ].
%H A024570 Clark Kimberling, <a href="/A024570/b024570.txt">Table of n, a(n) for n = 1..1000</a>
%t A024570 Table[Sum[Floor[1/FractionalPart[k*GoldenRatio]], {k, n}], {n, 100}] (* _Clark Kimberling_, Aug 15 2012 *)
%Y A024570 Cf. A024571. Partial sums of A024569.
%K A024570 nonn
%O A024570 1,2
%A A024570 _Clark Kimberling_
%E A024570 Corrected by _Clark Kimberling_, Aug 15 2012