|
|
A145591号 |
| a(n)=埃拉托斯特尼2^13筛分过程中每一步去除的数量。 |
|
2
|
|
|
4095, 1364, 545, 311, 170, 130, 91, 77, 63, 51, 46, 36, 34, 29, 26, 21, 17, 15, 12, 11, 9, 6, 3, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
小于2^13的素数等于2^13-(该序列中所有数字的总和)-1=A007053号(13).
|
|
链接
|
|
|
数学
|
f3[k_Integer?正,i_Integer吗?正]:=模[{f,m,r,p},p=转置[{r=范围[2,i],素数[r]}];f[x_]:=Catch[Fold[If[Mod[x,#2[[2]]]==0,Throw[m[#2[[1]]]=m[#2]+1],#1]&,If[Mod[x,2]==0,Throuw[m[1]=m[1]+1]],p]];表[m[n]=-1,{n,i}];f/@范围[k];表[m[n],{n,i}]];nn=13;kk=PrimePi[Sqrt[2^nn]];t3=f3[2^nn,kk](*Bob Hanlon(hanlonr(AT)cox.net)*)
|
|
交叉参考
|
|
|
关键词
|
完成,非n
|
|
作者
|
阿图尔·贾辛斯基在Bob Hanlon(hanlonr(AT)cox.net)的协助下,2008年10月14日
|
|
状态
|
已批准
|
|
|
|