Wolfram mathematica Mathematica函数中的复合表达式

Wolfram mathematica Mathematica函数中的复合表达式,wolfram-mathematica,Wolfram Mathematica,我想计算幂和S_p(x)=1^p+2^p+3^p+…+x^p使用代码 powersum[x_,p_]:=sum=0;For[i=1,i<x,i++,sum=sum+i^p];sum powersum[x,p]:=sum=0;对于所写的[i=1,i,Mathematica解析您的表达式如下: powersum[x_,p_]:=sum=0; (*Definition ended here*) For[i=1,i<x,i++,sum=sum+i^p]; sum powersum

我想计算幂和S_p(x)=1^p+2^p+3^p+…+x^p使用代码

powersum[x_,p_]:=sum=0;For[i=1,i<x,i++,sum=sum+i^p];sum

powersum[x,p]:=sum=0;对于所写的[i=1,i,Mathematica解析您的表达式如下:

 powersum[x_,p_]:=sum=0;  (*Definition ended here*)
 For[i=1,i<x,i++,sum=sum+i^p];
 sum
powersum[x,p]:=sum=0;(*定义到此结束*)

对于[i=1,i通常最好使用
模块[]

 powersum[x_,p_]:=Module[{sum},sum=0;For[i=1,i<x,i++,sum=sum+i^p];sum]


顺便说一句,你的总数少了一个学期。
 powersum[x_,p_]:=Module[{sum},sum=0;For[i=1,i<x,i++,sum=sum+i^p];sum]
 powersum[x_,p_]:=Module[{sum=0},For[i=1,i<x,i++,sum=sum+i^p];sum]
 powersum[x_,p_]:=Sum[i^p,{i,1,x-1}]
 powersum[x_, p_] := Range[x - 1]^p // Total