OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..1016
MATHEMATICA
lst={}; k=0; Do[p=Plus@@Divisors[f=Fibonacci[n]]; If[p>k, AppendTo[lst, f]; k=p], {n, 5!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jun 10 2009
EXTENSIONS
Name corrected by T. D. Noe, Jul 06 2010
STATUS
approved