OFFSET
1,1
COMMENTS
The corresponding prime indices are in A178971.
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..5624
EXAMPLE
Prime 613 can be expressed as 3+610 = Fibonacci(4)+Fibonacci(15), therefore 613 is in the sequence.
MATHEMATICA
f=Fibonacci[Range[33]]; Select[Union[Flatten[Outer[Plus, f, f]]], PrimeQ]
PROG
(PARI) list(lim)={
my(v, u=List(), t);
v=vector(log(lim*sqrt(5))\log((1+sqrt(5))/2)+1, n, fibonacci(n));
for(i=1, #v, for(j=i+1, #v,
t = v[i] + v[j];
if(t > lim, break);
if(ispseudoprime(t), listput(u, t))
));
vecsort(Vec(u), , 8)
}; \\ Charles R Greathouse IV, Jul 23 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Carmine Suriano, Jan 12 2011
STATUS
approved