登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:a095080
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A095080型 Fibbeven素数,即素数p的Zeckendorf-expansionA014417号(p) 以零结尾。 +0个
4
2, 3, 5, 7, 11, 13, 23, 29, 31, 37, 41, 47, 71, 73, 79, 83, 89, 97, 107, 109, 113, 131, 139, 149, 151, 157, 167, 173, 181, 191, 193, 199, 223, 227, 233, 241, 251, 257, 269, 277, 283, 293, 311, 317, 337, 353, 359, 367, 379, 397, 401, 409, 419, 421 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
阿洛伊斯·海因茨,n=1..10000时的n,a(n)表
A.Karttune和J.Moyer,计算该序列初始项的C程序
MAPLE公司
F: =组合[fibonacci]:
b: =proc(n)选项记忆;局部j;
如果n=0,则为0
否则对于来自2的j,而F(j+1)<=n做od;
b(n-F(j))+2^(j-2)
fi(菲涅耳)
结束时间:
a: =proc(n)选项记忆;局部p;
p: =`if`(n=1,1,a(n-1));
dop:=下一素数(p);
如果b(p)::偶数,则中断fi
od;第页
结束时间:
seq(a(n),n=1..100)#阿洛伊斯·海因茨2016年3月27日
数学
F=斐波那契;
b[n_]:=b[n]=模块[{j},
如果[n==0,0,对于[j=2,F[j+1]<=n,j++];
b[n-F[j]]+2^(j-2)]];
a[n_]:=a[n]=模块[{p},
p=如果[n==1,1,a[n-1]];虽然[正确,
p=下一素数[p];如果[EvenQ[b[p]],则中断[]]];p] ;
数组[a,100](*Jean-François Alcover公司2021年7月1日之后阿洛伊斯·海因茨*)
黄体脂酮素
(Python)
从sympy导入fibonacci,primerange
定义a(n):
k=0
x=0
当n>0时:
k=0
而斐波那契(k)<=n:k+=1
x+=10**(k-3)
n-=斐波那契(k-1)
返回x
定义正常(n):
return str(a(n))[-1]=“0”
打印([n表示n在素数范围内(11001),如果可以(n)])#印地瑞尼Ghosh2017年6月7日
交叉参考
关键词
非n
作者
安蒂·卡图恩2004年6月1日
状态
经核准的
第页1

搜索在0.007秒内完成

查找|欢迎光临|维基|注册|音乐|地块2|Demos公司|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人员OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年3月28日15:38。包含371254个序列。(在oeis4上运行。)