|
|
|
|
#12通过OEIS服务器2019年12月28日星期六14:18:30 EST |
| 链接
|
Amiram Eldar,<a href=“/A330711型/b330711号_1.txt“>n,a(n)表,n=1..10000</a>
|
|
|
|
#11通过安德鲁·霍罗伊德美国东部时间2019年12月28日星期六14:18:30 |
|
|
讨论
|
12月28日星期六
| 14:18
| OEIS服务器:已将新的b文件安装为b330711.txt。旧的b文件现在是b330711_1.txt。
|
|
|
|
#10通过米歇尔·马库斯2019年12月28日星期六04:13:33 EST |
|
|
|
#9通过阿米拉姆·埃尔达尔2019年12月28日星期六04:05:20 EST |
|
|
|
#8通过阿米拉姆·埃尔达尔2019年12月28日星期六02:56:07 EST |
| 链接
|
Amiram Eldar,<a href=“/A330711型/b330711美元_1.txt“>n表,n=1时为a(n)。。1026410000</a>
|
|
|
|
#7通过阿米拉姆·埃尔达尔2019年12月28日星期六02:55:10 EST |
| 链接
|
Amiram Eldar,<a href=“/A330711型/b330711.txt“>n表,n=1..10264时为a(n)</a>
|
| 状态
|
经核准的
编辑
|
|
|
|
#6通过苏珊娜·库勒2019年12月27日星期五19:14:46 EST |
|
|
|
#5通过阿米拉姆·埃尔达尔2019年12月27日星期五17:42:54 EST |
|
|
|
#4通过阿米拉姆·埃尔达尔2019年12月27日星期五17:39:10 EST |
|
|
|
#3通过阿米拉姆·埃尔达尔2019年12月27日星期五17:17:38 EST |
| 数学
|
联邦调查局fib条款[n_]:=模块[{k=天花板[Log[GoldenRatio,n*Sqrt[5]],t=n,fr={}},而[k>1,如果[t>=斐波那契[k],则附加到[fr,1];t=t-斐波纳契[k],附录[fr,0]];k--];fr];
dualZeckSum[n_]:=模块[{v=联邦调查局fib条款[n] },nv=长度[v];i=1;当[i<=nv-2时,如果[v[i]]==1&v[i+1]]==0&&v[[i+2]]==0,v[i]=0;v[[i+1]]=1;v[[i+2]]=1;如果[i>2,i-=3]];i++];i=位置[v,_?(#>0&)];如果[i=={},0,总计[v[[i[[1,1]]-1]]]]];
|
|
|
|