%I #8 Mar 30 2018 13:52:51
%S 0,0,1,2,4,6,8,11,14,18,22,27,32,37,43,49,56,63,71,79,87,96,105,115,
%T 125,135,146,157,169,181,194,207,220,234,248,263,278,294,310,326,343,
%U 360,378,396,415,434,453,473,493,514,535,556,578,600,623
%N [1/s]+[2/s]+...+[n/s], where s=(3+sqrt(3))/2, []=floor.
%C A183143 + A183144 = A000217 (the triangular numbers).
%F [1/s]+[2/s]+...+[n/s], where s=(3+sqrt(3))/2, []=floor.
%t With[{c=(3+Sqrt[3])/2},Accumulate[Floor[Range[60]/c]]] (* _Harvey P. Dale_, Mar 30 2018 *)
%Y Cf. A183142, A183143.
%K nonn
%O 1,4
%A _Clark Kimberling_, Dec 26 2010