[go: up one dir, main page]

login
A073875
Smallest nonzero Fibonacci number divisible by n not included earlier.
2
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
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
Sequence in context: A073656 A047930 A349100 * A356883 A377379 A372271
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