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

3, 10, 21, 35, 53, 75, 101, 130, 163, 200, 241, 285, 333, 385, 440, 499, 562, 629, 699, 773, 851, 933, 1018, 1107, 1200, 1297, 1397, 1501, 1609, 1720, 1835, 1954, 2077, 2203, 2333, 2467, 2605, 2746, 2891, 3040, 3193, 3349, 3509, 3673, 3840, 4011

Offset: 1

Author

Clark Kimberling, Aug 17 2011

Keywords

• nonn

Crossrefs

Cf. A003512 (Beatty sequence for 2+sqrt(3)).

Programs

Mathematica

c[n_] := Sum[Floor[j*(2+Sqrt[3])], {j, 1, n}];
c = Table[c[n], {n, 1, 90}]