A127884 a(n) = floor(Fibonacci(n)/n).

1, 0, 0, 0, 1, 1, 1, 2, 3, 5, 8, 12, 17, 26, 40, 61, 93, 143, 220, 338, 521, 805, 1245, 1932, 3001, 4668, 7274, 11350, 17732, 27734, 43428, 68072, 106805, 167731, 263641, 414732, 652913, 1028636, 1621691, 2558353, 4038540, 6378911, 10081265

Offset: 1

Author

Leroy Quet, Apr 05 2007

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000045.

Programs

GAP

List([1..50],n->Int(Fibonacci(n)/n)); # Muniru A Asiru, Apr 30 2018

Magma

[Floor(Fibonacci(n)/n): n in [1..50]]; // Vincenzo Librandi, Jul 10 2012

Maple

with(combinat): a:=n->floor(fibonacci(n)/n): seq(a(n),n=1..50); # Emeric Deutsch, Apr 16 2007

Mathematica

Table[Floor[Fibonacci[n]/n],{n,50}] (* Harvey P. Dale, Jan 25 2011 *)

PARI

for(n=1, 50, print1(floor(fibonacci(n)/n), ", ")) \\ G. C. Greubel, Apr 29 2018

PARI

a(n) = fibonacci(n)\n; \\ Michel Marcus, Apr 30 2018

Extensions

More terms from Emeric Deutsch, Apr 16 2007