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,1

Links

Table of n, a(n) for n=1..46.

Mathematica

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

Crossrefs

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

Sequence in context: A004194 A097590 A289183 * A281153 A014105 A354329

Adjacent sequences: A194138 A194139 A194140 * A194142 A194143 A194144

Keyword

nonn

Author

Clark Kimberling, Aug 17 2011

Status

approved