A194115 Sum{floor(j*sqrt(12)) : 1<=j<=n}; n-th partial sum of Beatty sequence for sqrt(12).

3, 9, 19, 32, 49, 69, 93, 120, 151, 185, 223, 264, 309, 357, 408, 463, 521, 583, 648, 717, 789, 865, 944, 1027, 1113, 1203, 1296, 1392, 1492, 1595, 1702, 1812, 1926, 2043, 2164, 2288, 2416, 2547, 2682, 2820, 2962, 3107, 3255, 3407, 3562, 3721

Offset: 1

Author

Clark Kimberling, Aug 16 2011

Keywords

• nonn

Crossrefs

Cf. A194028 (Beatty sequence for sqrt(12)).

Programs

Mathematica

c[n_] := Sum[Floor[j*Sqrt[12]], {j, 1, n}];
c = Table[c[n], {n, 1, 90}]