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

0, 3, 5, 7, 9, 11, 14, 16, 18, 20, 22, 25, 27, 29, 31, 33, 36, 38, 40, 42, 44, 47, 49, 51, 53, 55, 57, 60, 62, 64, 66, 68, 71, 73, 75, 77, 79, 82, 84, 86, 88, 90, 93, 95, 97, 99, 101, 103, 106, 108, 110, 112, 114, 117, 119, 121, 123, 125, 128, 130, 132, 134, 136

Offset: 0

Author

Clark Kimberling, Sep 10 2011

Keywords

• nonn

Links

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

Programs

Magma

[3*n-Floor(n*(1+Sqrt(5))/4): n in [0..70]]; // Vincenzo Librandi, Sep 11 2011

Mathematica

With[{c = GoldenRatio},Table[3*n - Floor[c*n/2],{n,0,50}]] (* G. C. Greubel, Oct 31 2017 *)

PARI

for(n=0,50, print1(3*n - floor(n*(1+sqrt(5))/4), ", ")) \\ G. C. Greubel, Oct 31 2017