%I#5 2013年1月4日11:54:26
%第2063274317462719563315706517008974432827112201617页,
%电话2597378078067393737469414001137044958919927401223316613,
%电话:7774783586125296999914639485637784106447121498526065585976633885427788637948074984030120148933
%N广义调和数H(p-1,p)的分子=和[1/k^p,{k,1,p-1}]除以素数p>3的p^3。
%广义调和数是H(n,m)=和[1/k^m,{k,1,n}]。对于素数p>3,广义调和数H(p-1,p)的分子可被p^3整除。
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/WolstenholmesTheorem.html“>Wolstenholme定理</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/HarmonicNumber.html“>谐波数</a>
%F a(n)=分子[Sum[1/k^素数[n],{k,1,素数[n]-1}]]/Prime[n]^3,对于n>2。
%e素数[3]=5。
%e a(3)=分子[1+1/2^5+1/3^5+1/4^5]/5^3=257875/125=2063。
%e素数[4]=7
%e a(4)=分子[1+1/2^7+1/3^7+1/4^7+1/5^7+1/6^7]/7^3=2743174627。
%t分子[表[Sum[1/k^素数[n],{k,1,素数[n]-1}],{n,3,9}]/表[Prime[n]^3,{n
%Y参见A099828、A099827、A001008、A007406、A00740.8、A007410。
%K压裂,非
%O 3、1
%A_Alexander Adamchuk,2006年6月13日
|