%I#24 2023年2月7日05:55:00

%第2、3、5、13、17、19、31、41、43、59、61、71、73、79、89103107113131151167页，

%电话：17317918119119712272292339257269293307313347，

%电话：34935336738340141943143449457463467479487491

%N Fibodious素数，即Zeckendorf-expansion A014417（p）包含奇数个1-fibits的素数p。

%H Amiram Eldar，<a href=“/A0955083/b095083.txt”>n，a（n）表，n=1..10000</a>（Indranil Ghosh术语1..656）

%H Antti Karttunen和John Moyer，计算该序列初始项的c程序。

%t选择[Flatten[Position[Mod[DigitCount[Select[Range[0，5000]，BitAnd[#，2#]==0&]，2，1]，1]-1，PrimeQ]（*_Amiram Eldar_，2023年2月7日*）

%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）：返回str（a（n））.count（“1”）%2

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

%A000040和A020899的Y交点。

%Y参考A014417、A095084、A095063。

%K nonn公司

%O 1，1

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