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

1, 3, 6, 10, 15, 21, 28, 36, 46, 57, 69, 82, 96, 111, 127, 144, 163, 183, 204, 226, 249, 273, 298, 324, 351, 380, 410, 441, 473, 506, 540, 575, 611, 649, 688, 728, 769, 811, 854, 898, 943, 989, 1037, 1086, 1136, 1187, 1239, 1292, 1346, 1401, 1458, 1516

Offset

1,2

Links

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

Mathematica

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

Crossrefs

Cf. A194151 (Beatty sequence for (sqrt(5))/2).

Sequence in context: A050760 A075057 A069792 * A025737 A120721 A122056

Adjacent sequences: A194150 A194151 A194152 * A194154 A194155 A194156

Keyword

nonn

Author

Clark Kimberling, Aug 17 2011

Status

approved