A195174 a(n) = 5*n - floor(3*n*r), where r=(1+sqrt(5))/2 (the golden ratio.)

0, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13

Offset

0,8

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..10000

Mathematica

Table[5n-Floor[3n GoldenRatio], {n, 0, 90}] (* Harvey P. Dale, Sep 10 2014 *)

Prog

(Magma) [5*n-Floor(3*n*(1+Sqrt(5))/2): n in [0..70]]; // Vincenzo Librandi, Sep 11 2011
(PARI) for(n=0, 50, print1(5*n - floor(3*n*(1+sqrt(5))/2), ", ")) \\ G. C. Greubel, Oct 31 2017

Crossrefs

Sequence in context: A226046 A133877 A132270 * A187185 A054896 A052364

Adjacent sequences: A195171 A195172 A195173 * A195175 A195176 A195177

Keyword

nonn

Author

Clark Kimberling, Sep 10 2011

Extensions

Offset changed from 1 to 0 by Vincenzo Librandi, Sep 11 2011

Status

approved