A161468 Fibonacci numbers that are more abundant than any smaller Fibonacci number.

1, 2, 3, 5, 8, 21, 34, 55, 89, 144, 377, 610, 987, 1597, 2584, 6765, 10946, 17711, 28657, 46368, 196418, 317811, 514229, 832040, 2178309, 3524578, 5702887, 9227465, 14930352, 63245986, 102334155, 267914296, 701408733, 1134903170, 2971215073

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

Cf. A002093

Sequence in context: A102016 A002363 A041457 * A229040 A143873 A273046

Adjacent sequences: A161465 A161466 A161467 * A161469 A161470 A161471

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jun 10 2009

Extensions

Name corrected by T. D. Noe, Jul 06 2010

Status

approved