如何用matlab求exp(x^2)在1到2 的积分?
实际上我想求的是函数exp(y*z^2/2-z^3/3)对z在-1到1上的积分,按照你们给的code还是求不出来,可以再帮我编一个吗...
实际上我想求的是函数exp(y*z^2/2-z^3/3)对z在-1到1上的积分,按照你们给的code还是求不出来,可以再帮我编一个吗
展开
展开全部
由于无法求得exp(x^2)的原函数,我们只能用数值算法来求解,可以用复化梯形公式、Romberg公式、Gauss公式等,有好多种。我用Matlab编了一个用Gauss公式求解积分的函数。
function S=GaussIntegrate()
%运用Gauss求积公式计算数值积分
%f为被积函数,Rho为权函数,二者均为符号函数
x=sym('x');
f=exp(x^2);
Rho=1;
%a,b分别为求积区间的左界和右界
a=1;
b=2;
%n表示求积结点的个数,是一正整数
n=8;
%本程序利用线性变换将区间[a,b]变换到[-1.1],
%同时令g=f*Rho为被积函数,然后利用
%古典的Gauss求积公式进行计算,此时直交多项式即为Legendre多项式
if n<=0||n~=floor(n)
error('错误,n必须是一个非负整数!');
end;
if a>b
error('错误,区间的左界a一定不大于右界b!');
end;
%计算n次Legendre多项式
syms x;
P=1/(2^n*factorial(n))*diff((x^2-1)^n,n);
w=roots(sym2poly(P));
%计算数值积分
A=zeros(1,n);
S=0;
for k=1:n
A(k)=2/((1-w(k)^2)*(subs(diff(P),w(k))^2));
t=a+(b-a)/2*(w(k)+1);
g=(b-a)/2*subs(f*Rho,t);
S=S+A(k)*g;
end;
--------------------------------
我取了8个结点,计算精度就已经达到了小数点后8位,效率还是很高的。
注意:由于Matlab调用Maple的符号计算工具箱,第一次运行时会加载一小会,耐心等待。
以后再运行速度就很快了。
function S=GaussIntegrate()
%运用Gauss求积公式计算数值积分
%f为被积函数,Rho为权函数,二者均为符号函数
x=sym('x');
f=exp(x^2);
Rho=1;
%a,b分别为求积区间的左界和右界
a=1;
b=2;
%n表示求积结点的个数,是一正整数
n=8;
%本程序利用线性变换将区间[a,b]变换到[-1.1],
%同时令g=f*Rho为被积函数,然后利用
%古典的Gauss求积公式进行计算,此时直交多项式即为Legendre多项式
if n<=0||n~=floor(n)
error('错误,n必须是一个非负整数!');
end;
if a>b
error('错误,区间的左界a一定不大于右界b!');
end;
%计算n次Legendre多项式
syms x;
P=1/(2^n*factorial(n))*diff((x^2-1)^n,n);
w=roots(sym2poly(P));
%计算数值积分
A=zeros(1,n);
S=0;
for k=1:n
A(k)=2/((1-w(k)^2)*(subs(diff(P),w(k))^2));
t=a+(b-a)/2*(w(k)+1);
g=(b-a)/2*subs(f*Rho,t);
S=S+A(k)*g;
end;
--------------------------------
我取了8个结点,计算精度就已经达到了小数点后8位,效率还是很高的。
注意:由于Matlab调用Maple的符号计算工具箱,第一次运行时会加载一小会,耐心等待。
以后再运行速度就很快了。
追问
实际上我想求的是函数exp(y*z^2/2-z^3/3)对z在-1到1上的积分,能用你给的code再帮我编一次吗,谢了
追答
exp(y*z^2/2-z^3/3),y等于多少啊?这个你直接把f和积分区间[a,b]修改一下就行了。
展开全部
syms x
y = exp(x^2);
vpa(int(y,x,1,2)) %int的部分因为无法表达出来,所以matlab用erfi这个误差函数来代替。vpa是将这个符号数,转换成有限精度的浮点数。默认字长32。
y = exp(x^2);
vpa(int(y,x,1,2)) %int的部分因为无法表达出来,所以matlab用erfi这个误差函数来代替。vpa是将这个符号数,转换成有限精度的浮点数。默认字长32。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
X ='exp(x^2)';
int(X,1,2)
如果对你有用,请采纳最佳!!
int(X,1,2)
如果对你有用,请采纳最佳!!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可按下面计算:
>> syms x
>> a=int(exp(x^2),1,2)
a =
-(pi^(1/2)*(erfi(1) - erfi(2)))/2
>> vpa(a)
ans =
14.989976019600048615932355867311
>> syms x
>> a=int(exp(x^2),1,2)
a =
-(pi^(1/2)*(erfi(1) - erfi(2)))/2
>> vpa(a)
ans =
14.989976019600048615932355867311
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
syms x
isym=vpa(int(exp(x^2),x,0,1))
isym=vpa(int(exp(x^2),x,0,1))
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询