login
A135954
Nonprime Fibonacci numbers with prime indices (A050937) that have exactly 3 prime factors.
7
24157817, 44945570212853, 1500520536206896083277, 50095301248058391139327916261, 11463113765491467695340528626429782121, 30010821454963453907530667147829489881, 2211236406303914545699412969744873993387956988653, 103881042195729914708510518382775401680142036775841
OFFSET
1,1
COMMENTS
Conjecture: All numbers in this sequence are products of three sums of two squares.
MATHEMATICA
k = {}; Do[If[ !PrimeQ[Fibonacci[Prime[n]]], c = Length[FactorInteger[Fibonacci[Prime[n]]]]; If[c == 3, AppendTo[k, Fibonacci[Prime[n]]]]], {n, 1, 50}]; k
PROG
(PARI) f(n) = forprime(x=2, n, p=fibonacci(x); if(!isprime(p) && omega(p) == 3, print1(p", "))) \\ Georg Fischer, Feb 15 2025
KEYWORD
nonn
AUTHOR
Artur Jasinski, Dec 08 2007
EXTENSIONS
a(6)-a(8) from Georg Fischer, Feb 15 2025
STATUS
approved