%I#29 2022年6月23日07:02:27

%S 1,3,12,24,42,60132303312450564123614192922100981206013848，

%电话：172292235637896251904

%N数m，使素数（m）+斐波那契（m）为素数。

%C a（22）>256737.-_J.W.L.（Jan）Eerland，2022年6月22日

%t Do[If[PrimeQ[Prime[n]+Fibonacci[n]]，打印[n]，{n，1，150000}]

%t选择[Range[10000]，PrimeQ[Fibonacci[#]+Prime[#]]&]（*_Winenzo Librandi_，2016年7月29日

%t删除案例[ParallelTable[If[PrimeQ[Prime[n]+Fibonacci[n]]，n，a]，{n，0256737}]，a]（*_J.W.L.（Jan）Eerland_，2022年6月22日*）

%o（PARI）对于（n=1,10^5，如果（i素数（素数（n）+斐波那契（n）），打印1（n，“”））

%o（岩浆）[1..2000年]|IsPrime（NthPrime（n）+Fibonacci（n））]；//_文森佐·利班迪（Vincenzo Librandi），2016年7月29日

%Y参考A004397。

%K非n，更多

%O 1,2号机组

%A _Jason Earls，2001年10月6日

%E更多条款摘自2001年10月8日的_Robert G.Wilson v_

%E a（18）-a（19）摘自_文森佐图书馆_，2020年4月10日

%E a（20），来自J.W.L.（1月）Eerland，2021年12月23日

%E a（21），来自J.W.L.（1月）Eerland，2022年6月22日