login
A114817
Indices of Fibonacci numbers with 8 prime factors when counted with multiplicity.
2
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
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
KEYWORD
nonn
AUTHOR
Shyam Sunder Gupta, Feb 19 2006
EXTENSIONS
More terms from Ryan Propper, May 24 2006
STATUS
approved