cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A114816 Indices of Fibonacci numbers with 7 prime factors when counted with multiplicity.

This page as a plain text file.
%I A114816 #18 Oct 14 2019 08:50:03
%S A114816 30,42,56,66,70,81,104,105,136,148,152,164,175,195,207,212,244,254,
%T A114816 259,289,291,292,298,305,319,326,332,344,365,367,403,404,423,445,447,
%U A114816 451,458,478,489,511,517,519,526,533,537,543,554,565,566,597,605,679,681
%N A114816 Indices of Fibonacci numbers with 7 prime factors when counted with multiplicity.
%H A114816 Amiram Eldar, <a href="/A114816/b114816.txt">Table of n, a(n) for n = 1..112</a>
%H A114816 Blair Kelly, <a href="http://mersennus.net/fibonacci/">Fibonacci and Lucas Factorizations</a>.
%e A114816 a(1) = 30 because 30th Fibonacci number (i.e., 832040) consists of 7 prime factors (i.e., 2*2*2*5*11*31*61).
%t A114816 t = {}; Do[f = FactorInteger[Fibonacci[n]]; If[Total[Transpose[f][[2]]] == 7, AppendTo[t, n]], {n, 2, 100}]; t (* _T. D. Noe_, Mar 14 2014 *)
%o A114816 (PARI) n=1;while(n<310,if(bigomega(fibonacci(n))==7,print1(n,", "));n++)
%Y A114816 Cf. A000045.
%Y A114816 Column k=7 of A303215.
%K A114816 nonn
%O A114816 1,1
%A A114816 _Shyam Sunder Gupta_, Feb 19 2006
%E A114816 More terms from _Ryan Propper_, May 22 2006