A073875 Smallest nonzero Fibonacci number divisible by n not included earlier.

1, 2, 3, 8, 5, 144, 21, 2584, 46368, 610, 55, 14930352, 13, 4807526976, 6765, 1548008755920, 34, 498454011879264, 86267571272, 832040, 987, 2880067194370816120, 51680708854858323072, 160500643816367088, 75025

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..481

Maple

S:= {}:
for n from 1 to 100 do
  for k from 1 do
     if member(k, S) then next fi;
     Fk:= combinat:-fibonacci(k);
     if Fk mod n = 0 then A[n]:= Fk; S:= S union {k}; break fi
  od
od:
seq(A[i], i=1..100); # Robert Israel, Jan 05 2017

Crossrefs

Cf. A047930, A073876.

Sequence in context: A073656 A047930 A349100 * A356883 A372271 A220395

Adjacent sequences: A073872 A073873 A073874 * A073876 A073877 A073878

Keyword

nonn

Author

Amarnath Murthy, Aug 16 2002

Extensions

More terms from Sascha Kurz, Jan 03 2003

Name clarified by Robert Israel, Jan 05 2017

Status

approved