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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A194172 Partial sums of A194171. 2
0, 1, 2, 4, 7, 10, 13, 17, 22, 27, 32, 38, 44, 51, 58, 66, 74, 82, 91, 101, 112, 123, 135, 147, 160, 173, 187, 201, 216, 231, 247, 263, 279, 295, 312, 330, 348, 367, 387, 407, 427, 448, 470, 492, 514, 537, 561, 585, 609, 634, 660, 686, 712, 739, 766, 793 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

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

MATHEMATICA

r = 1/2 + Sqrt[5];

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

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

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

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

CROSSREFS

Cf. A194171.

Sequence in context: A130243 A061465 A126022 * A173537 A049983 A168112

Adjacent sequences:  A194169 A194170 A194171 * A194173 A194174 A194175

KEYWORD

nonn

AUTHOR

Clark Kimberling, Aug 18 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 October 26 13:09 EDT 2021. Contains 348267 sequences. (Running on oeis4.)