作业帮 > 综合 > 作业

悬赏200分求高手帮忙用matlab求出此二重积分的结果,

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/27 21:09:52
悬赏200分求高手帮忙用matlab求出此二重积分的结果,
1解析解没有
B=18;H=14;L=15;b=1;s=0.3;w=pi/16;R=14;
syms t x y
x0=L-R*cos(pi/8-w*t);
y0=R*sin(pi/8-w*t);
In=0.25*t+1;
ft1=In*(-x0*(x-x0)+(L-y0)*(y-y0))*H/2/(R*((x0-x)^2+(y0-y)^2+(H/2)^2)^2)
ft=int(int(ft1,y,b,L),x,-B/2,B/2)
积不出表达式
2 数值积分
clear;
B=18;H=14;L=15;b=1;s=0.3;w=pi/16;R=14;
syms t x y
x0=L-R*cos(pi/8-w*t);
y0=R*sin(pi/8-w*t);
In=0.25*t+1;
ft1=In*(-x0*(x-x0)+(L-y0)*(y-y0))*H/2/(R*((x0-x)^2+(y0-y)^2+(H/2)^2)^2)
t1=0:0.01:4;
st=zeros(1,length(t1));
for i=1:length(t1);
t=t1(i);
ft=subs(ft1);
st(i)=quad2d(@(x,y)eval(ft),-B/2,B/2,b,L);
end
plot(t1,st,'b.')