%I #7 Sep 03 2017 03:29:50
%S 2,3,5,7,41,43,653,661,14931013,14931157,2880067194385747277,
%T 2880067194385747279,555565404227172761598401539087,
%U 370959230771131880927453873620406224662533776582329191
%N Beginning with 2, prime numbers such that successive differences are Fibonacci numbers.
%p with(combinat): a[1]:=2: for n from 2 to 15 do p:=proc(k) if isprime(a[n-1]+fibonacci(k))=true then a[n-1]+fibonacci(k) else fi end: a[n]:=[seq(p(k),k=1..500)][1] od: seq(a[n],n=1..15); # _Emeric Deutsch_, Jul 28 2005
%Y Cf. A110364.
%K nonn
%O 1,1
%A _Amarnath Murthy_, Jul 23 2005
%E More terms from _Emeric Deutsch_, Jul 28 2005