login
A194142
a(n) = Sum_{j=1..n} floor(j*(3-sqrt(3))); n-th partial sum of Beatty sequence for 3-sqrt(3).
0
1, 3, 6, 11, 17, 24, 32, 42, 53, 65, 78, 93, 109, 126, 145, 165, 186, 208, 232, 257, 283, 310, 339, 369, 400, 432, 466, 501, 537, 575, 614, 654, 695, 738, 782, 827, 873, 921, 970, 1020, 1071, 1124, 1178, 1233, 1290, 1348, 1407, 1467, 1529, 1592, 1656
OFFSET
1,2
MATHEMATICA
c[n_] := Sum[Floor[j*(3-Sqrt[3])], {j, 1, n}];
c = Table[c[n], {n, 1, 90}]
CROSSREFS
Partial sums of A182777.
Sequence in context: A310116 A125627 A332410 * A174648 A178419 A065504
KEYWORD
nonn
AUTHOR
Clark Kimberling, Aug 17 2011
STATUS
approved