编号：A354917-OEIS

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

搜索： 编号：a354917

显示1-1个结果（共1个）。

第页1

排序：关联|参考文献|数|被改进的|创建格式：长的|短的|数据

A354917型

和{p=primes}1/（p*log（p）^3）的十进制展开式。

+0
8

1, 8, 4, 6, 1, 4, 7, 4, 1, 9, 3, 6, 6, 4, 4, 9, 5, 2, 7, 7, 2, 8, 6, 9, 3, 6, 5, 1, 4, 2, 3, 7, 9, 3, 9, 2, 8, 4, 9, 1, 8, 4, 2, 8, 2, 3, 4, 2, 1, 3, 0, 3, 7, 0, 5, 6, 6, 3, 6, 3, 3, 3, 0, 1, 1, 9, 2, 8, 5, 8, 0, 7, 5, 3, 6, 6, 6, 1, 6, 8, 9, 9, 0, 9, 0, 3, 5, 0, 1, 5, 2, 5, 5, 0, 7, 1, 9, 7, 3, 6, 9, 9, 9, 6, 1

(列表;常数;图表;参考文献;听;历史;文本;内部格式)

抵消

1,2

链接

n=1..105时的n、a（n）表。

R.J.Mathar，素数zeta函数某些积分的二十位数，arXiv:0811.4739[math.NT]，2008-2018年。

例子

1.8461474193664495...

数学

数字=105；精度=数字+15；

tmax=500；（*被积函数在tmax之外可忽略不计*）

kmax=500；（*f（k）在kmax之外可忽略不计*）

InLogZeta[k_]：=NIntegrate[（t-k）^2 Log[Zeta[t]]，{t，k，tmax}，工作精度->精度，最大递归->20，精度目标->精度]；

f[k_]：=与[{mu=MoebiusMu[k]}，如果[mu==0，0，（mu/（2k^4））*InLogZeta[k]]]；

s=0；

Do[s=s+f[k]；打印[k，“”，s]，{k，1，kmax}]；

实数字[s][[1]][[1；；数字]](*让-弗朗索瓦·奥尔科弗2022年6月21日之后瓦茨拉夫·科特索维奇*)

黄体脂酮素

（PARI）默认值（realprecision，200）；s=0；对于（k=1500，s=s+moebius（k）/（2*k^4）*intnum（x=k，[1]，1]，（x-k）^2*log（zeta（x））；打印件）；

交叉参考

囊性纤维变性。A137245号,A145419号,A221711号,A319231型,A319232型.

关键词

作者

瓦茨拉夫·科特索维奇2022年6月12日

扩展

最后一位更正者让-弗朗索瓦·奥尔科弗并由确认瓦茨拉夫·科特索维奇2022年6月22日

状态

经核准的

第页1

搜索在0.006秒内完成