A154908 Highly composite Fibonacci numbers.

1, 2, 8, 144, 2584, 46368, 14930352, 4807526976, 1548008755920, 498454011879264, 160500643816367088, 2880067194370816120, 51680708854858323072, 16641027750620563662096, 5358359254990966640871840

Offset: 1

Author

Omar E. Pol, Jan 18 2009, Jan 20 2009

Keywords

• nonn

Comments

Positive Fibonacci numbers with record values for the number of divisors.

Examples

			144 is in the sequence because it is a Fibonacci number with 15 divisors and all smaller Fibonacci numbers have fewer divisors. - _Emeric Deutsch_, Jan 20 2009
		

Links

• Amiram Eldar, Table of n, a(n) for n = 1..33

Crossrefs

Cf. A000005, A000045, A002182, A063375, A154906, A154907.

Programs

Maple

with(numtheory): with(combinat): a := proc (n) if n = 1 then 1 else if max(seq(tau(fibonacci(j)), j = 1 .. n-1)) < tau(fibonacci(n)) then fibonacci(n) else end if end if end proc: seq(a(n), n = 1 .. 170); # Emeric Deutsch, Jan 20 2009

Mathematica

DeleteDuplicates[{#,DivisorSigma[0,#]}&/@Fibonacci[Range[200]],GreaterEqual[#1[[2]],#2[[2]]]&][[;;,1]] (* Harvey P. Dale, Aug 10 2025 *)

Extensions

Extended by Emeric Deutsch, Jan 20 2009