OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
MATHEMATICA
Table[2n-Floor[(n*GoldenRatio)/4], {n, 0, 70}] (* Harvey P. Dale, Nov 12 2014 *)
PROG
(Magma) [2*n-Floor(n*(1+Sqrt(5))/8): n in [0..70]]; // Vincenzo Librandi, Sep 11 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Sep 09 2011
STATUS
approved