|
|
A127884
|
|
a(n) = floor(Fibonacci(n)/n).
|
|
2
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,8
|
|
LINKS
|
|
|
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 *)
|
|
PROG
|
(PARI) for(n=1, 50, print1(floor(fibonacci(n)/n), ", ")) \\ G. C. Greubel, Apr 29 2018
(GAP) List([1..50], n->Int(Fibonacci(n)/n)); # Muniru A Asiru, Apr 30 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|