|
%I #16 Oct 14 2019 06:53:25
%S 176,192,198,224,297,315,364,385,410,430,441,455,496,555,582,606,609,
%T 621,627,638,682,710,711,726,729,734,759,775,805,814,826,846,854,897,
%U 903,908,932,935,981,987,994,1001,1002,1022,1025,1067,1086,1089,1105,1244,1246
%N Indices of Fibonacci numbers with 12 distinct prime factors.
%H Amiram Eldar, <a href="/A114824/b114824.txt">Table of n, a(n) for n = 1..56</a>
%H Blair Kelly, <a href="http://mersennus.net/fibonacci/">Fibonacci and Lucas Factorizations</a>.
%e a(1)=176 because 176th Fibonacci number (i.e. 2706074082469569338358691163510069157) consists of 12 distinct prime factors (i.e. 3 * 7 * 43 * 47 * 89 * 199 * 263 * 307 * 881 * 967 * 93058241 * 56241856)
%t Flatten[Position[Fibonacci[Range[1110]],_?(PrimeNu[#]==12&)]] (* _Harvey P. Dale_, Jan 17 2015 *)
%o (PARI) n=1;while(n<320,if(omega(fibonacci(n))==12,print1(n,", "));n++)
%Y Column k=12 of A303217.
%K hard,nonn
%O 1,1
%A _Shyam Sunder Gupta_, Feb 19 2006
%E More terms from _Ryan Propper_, Apr 26 2006
%E a(42)-a(49) from _Max Alekseyev_, Aug 17 2013
%E a(50)-a(51) from _Amiram Eldar_, Oct 14 2019
|
