%I#36 2023年4月6日03:15:08
%S 2,1,1,0,0,0,1,0,3,0,2,3,4,0,5,0,2,3,34,0987463682584,3,2,0,13144号
%N a(N)=使F(k)+F(N)是素数的最小斐波那契数F(k。
%Ca(26)目前未知。
%如果不是-1,则C a(26)>10^7000_罗伯特·伊斯雷尔,2023年4月3日
%F a(n)=A000045(A361902(A000045_Pontus von Brömssen,2023年3月30日
%p与(组合):
%p a:=[];b: =[];对于从0到25 do的n
%p k:=0;t1:=斐波那契(n);
%p在非为素数时(fibonacci(k)+t1)做k:=k+1;日期:
%p a:=[op(a),fibonacci(k)];b: =[op(b),k];
%日期:
%第页;#A361509型
%第二页;#邮编:361510
%t a[n_]:=模[{fn=Fibonacci[n],k=0},While[!PrimeQ[fn+Fibonaci[k]],k++];斐波那契[k]];数组[a,26,0](*_Amiram Eldar_,2023年3月30日*)
%o(PARI)a(n)=my(k=0,fn=fibonacci(n));while(!i素数(fn+fibonacci(k)),k++);斐波那契(k);\\_米歇尔·马库斯,2023年3月30日
%Y参考A000045、A361510、A361902。
%K nonn,更多,更少
%0、1
%A _杰克·布拉克斯顿,2023年3月26日
%E编辑:N.J.A.Sloane,2023年3月30日