login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A194228 Partial sums of A194227. 2
0, 0, 1, 2, 4, 7, 10, 13, 16, 20, 24, 29, 35, 41, 47, 53, 60, 67, 75, 84, 93, 102, 111, 121, 131, 142, 154, 166, 178, 190, 203, 216, 230, 245, 260, 275, 290, 306, 322, 339, 357, 375, 393, 411, 430, 449, 469, 490, 511, 532, 553, 575, 597, 620, 644, 668, 692 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,4

LINKS

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

MATHEMATICA

r = 2/7;

a[n_] := Floor[Sum[FractionalPart[k*r], {k, 1, n}]]

Table[a[n], {n, 1, 90}]    (* A194227 *)

s[n_] := Sum[a[k], {k, 1, n}]

Table[s[n], {n, 1, 100}]   (* A194228 *)

CROSSREFS

Cf. A194227.

Sequence in context: A135678 A001195 A295513 * A194236 A127762 A137281

Adjacent sequences:  A194225 A194226 A194227 * A194229 A194230 A194231

KEYWORD

nonn

AUTHOR

Clark Kimberling, Aug 19 2011

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 20 19:53 EST 2020. Contains 331096 sequences. (Running on oeis4.)