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

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A357690 A341984 A028895 * A341065 A246817 A010898

Adjacent sequences: A194147 A194148 A194149 * A194151 A194152 A194153

Keyword

nonn

Author

Clark Kimberling, Aug 17 2011

Status

approved