%I#28 2021年3月15日03:41:13

%S 2,4,7,6,1,9,4,74,8,1,6,5,0,2,5,7,4,3,2,6,8,5,5,4,4,4，1,2,5,1,4,5，

%T 1,6,0,0,4,5,4,5-6,8,5,6,3,5,5,2,8,4,3,8,4,1,4,7,0,7,9,1,5,0,9，

%U 4,9,0,3,0,1,1,7,5,1,2,4,5,8,1,76,2,8,0,1,3,4,6,1,5,2,6,7,3,8,9

%Sum_{k>=1}1/phi（k）^3的N十进制展开式，其中phi是欧拉总函数。

%C和{k>=1}1/phi（k）^m是收敛的，当m>1（参考Monier）_伯纳德·肖特，2021年1月14日

%D Jean-Marie Monier，《分析》，《演习评论》，2ème anneée MP，Dunod，1997年，演习3.2.21，第281和294页。

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/TotientFunction.html“>总功能</a>。

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/TotientSummatoryFunction.html“>总求和函数</a>。

%H维基百科，<a href=“http://en.wikipedia.org/wiki/Euler%27s_phi_function网站“>Euler的totient函数。

%F等于乘积{素数p}（1+1/（（1-1/p）^3*（p^3-1））。

%电子邮箱：2.4761947481650257943268554441251451600454568566355284384345707879150949。。。

%t$MaxExtraPrecision=1000；f[p]：=（1+1/（（1-1/p）^s*（p^s-1））/。s->3；Do[cc=Rest[CoefficientList[Series[Log[f[1/x]]，{x，0，m}]，x]]；打印[f[2]*Exp[N[Sum[Indexed[cc，N]*（PrimeZetaP[N]-1/2^N），{N，2，m}]，120]]，{m，100，1000，100}]

%o（PARI）prodeulerrat（1+1/（（1-1/p）^3*（p^3-1）））\\阿米拉姆·埃尔达尔，2021年3月15日

%Y参见A000010、A065484、A109695、A335319。

%K nonn，cons公司

%O 1,1号机组

%2020年6月25日，A _ Vaclav Kotesovec_