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

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A143056 A294401 A194139 * A226184 A066506 A058331

Adjacent sequences: A194112 A194113 A194114 * A194116 A194117 A194118

Keyword

nonn

Author

Clark Kimberling, Aug 16 2011

Status

approved