A114817 Indices of Fibonacci numbers with 8 prime factors when counted with multiplicity.

54, 78, 102, 128, 130, 135, 147, 154, 170, 171, 182, 217, 231, 236, 238, 279, 290, 309, 316, 338, 355, 374, 436, 442, 452, 471, 481, 524, 538, 548, 553, 649, 694, 725, 796, 801, 818, 833, 838, 847, 849, 851, 886, 889, 922, 923, 926, 939, 949, 958, 963, 965

Offset

1,1

Links

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

Blair Kelly, Fibonacci and Lucas Factorizations.

Example

a(1)=54 because 54th Fibonacci number (i.e., 86267571272) consists of 8 prime factors (i.e., 2*2*2*17*19*53*109*5779).

Mathematica

t = {}; Do[f = FactorInteger[Fibonacci[n]]; If[Total[Transpose[f][[2]]] == 8, AppendTo[t, n]], {n, 2, 200}]; t (* T. D. Noe, Mar 14 2014 *)

Prog

(PARI) n=1; while(n<320, if(bigomega(fibonacci(n))==8, print1(n, ", ")); n++)

Crossrefs

Column k=8 of A303215.

Sequence in context: A039532 A007244 A365262 * A045005 A043185 A039362

Adjacent sequences: A114814 A114815 A114816 * A114818 A114819 A114820

Keyword

nonn,changed

Author

Shyam Sunder Gupta, Feb 19 2006

Extensions

More terms from Ryan Propper, May 24 2006

Status

approved