OFFSET
1,3
FORMULA
[1/r]+[2/r]+...+[n/r], where r=sqrt(3) and []=floor.
MATHEMATICA
Accumulate[Floor[Range[60]/Sqrt[3]]] (* Harvey P. Dale, Sep 10 2019 *)
PROG
(PARI) default(realprecision, 100); r=sqrt(3); for(n=1, 99, print1(sum(k=1, n, floor(k/r)), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Dec 26 2010
STATUS
approved