%I#14 2023年4月1日23:22:15

%S 3,1,1,0,0,4,0,3,4,9,0,5,0,2,4,9,16,24,18,4,3,0,7,12

%N a（N）=最小k>=0，这样斐波那契（k）+斐波那奇（N）是素数，或者-1，如果不存在这样的k。

%C a（26）目前未知。

%F a（n）=A361902（A000045（n））_Pontus von Brömssen，2023年3月30日

%p见A361509。

%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、A361509、A361902。

%K nonn，更多，更少

%0、1

%A _杰克·布拉克斯顿，2023年3月26日

%E编辑：N.J.A.Sloane，2023年3月30日