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

Author

Amarnath Murthy, Aug 16 2002

Keywords

• nonn

Links

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

Crossrefs

Cf. A047930, A073876.

Programs

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

Extensions

More terms from Sascha Kurz, Jan 03 2003

Name clarified by Robert Israel, Jan 05 2017