搜索: a079379-编号:a079378
|
|
|
|
2, 5, 7, 5, 5, 2, 11, 5, 2, 13, 11, 5, 5, 5, 5, 2, 5, 3, 5, 11, 2, 79, 37, 11, 5, 3, 7, 17, 59, 23, 11, 2, 17, 7, 3, 7, 7, 383, 337, 67, 13, 19, 47, 23, 41, 17, 17, 13, 67, 71, 47, 17, 11, 19, 73, 53, 17, 13, 37, 19, 11, 5, 13, 29, 43, 47, 17, 5, 5, 11, 3, 3, 17, 5, 97, 29, 11, 3, 3, 3, 7
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,1
|
|
评论
|
对于(0,1])中的x,定义P(x)=min{P:P素数,1/x<P},Phi(x)=P(x)x-1。x(0)的代价素数展开式是序列a(0),a(1)。。。由x(n)=Phi(x(n-1))(n>0),a(n)=P(x(n。
|
|
链接
|
|
|
MAPLE公司
|
数字:=500:P:=proc(x)local y;y:=天花板(evalf(1/x));如果是素数(y),则y为下一素数(y);fi;结束;F:=过程(x)局部y,i,t1;y:=x;t1:=[];对于i从1到100,做p:=p(y);t1:=[op(t1),p];y:=p*y-1;od;t1;结束;F(平方(5)-1)/2);
|
|
数学
|
$MaxExtraPrecision=500;P[x_]:=模块[{y},y=天花板[1/x];如果[PrimeQ[y],y,NextPrime[y]]];F[x_]:=模[{y,i,t1},y=x;t1={};对于[i=1,i<=100,i++,附加到[t1,p=p[y]];y=p*y-1];t1];F[(平方[5]-1)/2](*G.C.格鲁贝尔2019年1月20日*)
|
|
交叉参考
|
|
|
关键词
|
非n,容易的
|
|
作者
|
|
|
扩展
|
Mark Hudson的更多条款(mrmarkhudson(AT)hotmail.com),2003年2月17日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
|
抵消
|
1,2
|
|
评论
|
|
|
链接
|
|
|
数学
|
a={};l=0;
|
|
交叉参考
|
|
|
关键词
|
非n,更多
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
搜索在0.005秒内完成
|