A194150 a(n) = Sum_{j=1..n} floor(j*(3+sqrt(5))); n-th partial sum of Beatty sequence for 3+sqrt(5).

5, 15, 30, 50, 76, 107, 143, 184, 231, 283, 340, 402, 470, 543, 621, 704, 793, 887, 986, 1090, 1199, 1314, 1434, 1559, 1689, 1825, 1966, 2112, 2263, 2420, 2582, 2749, 2921, 3099, 3282, 3470, 3663, 3861, 4065, 4274, 4488, 4707, 4932, 5162, 5397

Offset: 1

Author

Clark Kimberling, Aug 17 2011

Keywords

• nonn

Crossrefs

Cf. A001962 (Beatty sequence for 3+sqrt(5)).

Programs

Mathematica

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