login
A179429
Primes that are sum of three positive Fibonacci numbers.
0
3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 59, 61, 71, 73, 79, 89, 97, 103, 107, 113, 131, 149, 151, 157, 167, 173, 179, 181, 191, 199, 233, 239, 241, 251, 257, 269, 293, 379, 383, 401, 419, 433, 467, 479, 487, 521, 523, 613, 617, 619
OFFSET
1,1
EXAMPLE
a(6)=17=1+3+13=Fib(1)+Fib(4)+Fib(7)
MATHEMATICA
f=Fibonacci[Range[15]]; Select[Union[Flatten[Outer[Plus, f, f, f]]], # <= f[[-1]]+2 && PrimeQ[#] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Carmine Suriano, Jan 12 2011
STATUS
approved