OFFSET
1,1
COMMENTS
Primes of the form Fibonacci(x)+Fibonacci(y), x-y>1.
FORMULA
EXAMPLE
7 = 5+2. 11=8+3. 23=21+2. 29 =21+8.
MATHEMATICA
nn = 40; f = Fibonacci[Range[nn]]; ps = {}; Do[ps = Union[ps, Select[f[[k]] + Delete[f, {{k-1}, {k}, {k+1}}], PrimeQ]], {k, 4, nn-1}]; ps (* T. D. Noe, May 08 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alex Ratushnyak, May 05 2012
EXTENSIONS
More terms from T. D. Noe, May 08 2012
STATUS
approved