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

2, 7, 14, 24, 37, 52, 70, 91, 114, 140, 169, 200, 234, 271, 310, 352, 396, 443, 493, 545, 600, 658, 718, 781, 847, 915, 986, 1060, 1136, 1215, 1297, 1381, 1468, 1557, 1649, 1744, 1841, 1941, 2044, 2149, 2257, 2368, 2481, 2597, 2716, 2837, 2961

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A022841 (Beatty sequence for sqrt(7)).

Sequence in context: A119354 A249547 A088207 * A343859 A102999 A225277

Adjacent sequences: A194108 A194109 A194110 * A194112 A194113 A194114

Keyword

nonn

Author

Clark Kimberling, Aug 15 2011

Status

approved