%I#25 2021年5月6日11:04:12

%S 17,19,43,53,59,61,67101103127137163179197211229239263271，

%电话：281307313313473493733389433449457467491499509569，

%电话：577593601619643653661677739773787797821823

%N个Fibodd素数，即Zeckendorf-expansion A014417（p）以1结尾的素数p。

%H Alois P.Heinz，n的表格，n=1..10000的a（n）</a>

%H A.Karttunen和J.Moyer，<A href=“/A0955062/A095062.c.txt”>c程序，用于计算该序列的初始项</a>

%t r=地图[Fibonacci，Range[2，12]]；选择[Prime@Range@144，Last@Flatten@Map[Position[r，#]&，Abs@Differences@NestWhileList[Function[k，k-SelectFirst[Reverse@r，#<k&]]，#+1，#>1&]]==1&]（*_Michael De Vlieger_，2016年3月27日，版本10*）

%o（PARI）

%o genit（maxx）={表示（n=1，maxx，q=（n-1）+（n+平方（5*n^2））；如果是（i质数（q），打印1（q，“，”））；}\\比尔·麦凯琴，2016年3月26日

%o（Python）

%o来自sympy import fibonacci，primerange

%o定义a（n）：

%o k=0

%o x=0

%o当n>0时：

%o k=0

%o而fibonacci（k）<=n:k+=1

%o x+=10**（k-3）

%o n-=斐波那契（k-1）

%o返回x

%o定义正常（n）：

%o返回str（a（n））[-1]==“1”

%o打印（[n代表n，在素数范围（11001）中，如果可以（n）]）#_Indranil Ghosh，2017年6月7日

%A000040和A003622的Y交点。A095086和A095089的联合。参见A095061、A095080。

%K nonn公司

%O 1,1号机组

%2004年6月1日，安蒂·卡图宁