|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
function shuipingyidong
c=13;m=3.1;q=0.89;a=8;h=304;
v1=0.92;r=159;b=0.27;
w0=m*q*1000*cosd(a);
t1=30/0.92;
t(1)=60/360;
p1=1-exp(-c.*t(1));
p2=1-exp(-c.*(t(1)-t/360));
x=-200:20:500;
u1=b*w0*(p1*(exp(-pi*x.^2/r.^2)-exp(-pi*(x-v1*t1).^2/r.^2))+...
p2*(exp(-pi*(x-v1*t1).^2/r.^2)-exp(-pi*(x-2*v1*t1).^2/r.^2)));
t(2)=120/360;
p1=1-exp(-c.*t(2));
p2=1-exp(-c.*(t(2)-t/360));
p3=1-exp(-c.*(t(2)-2*t/360));
p4=1-exp(-c.*(t(2)-3*t/360));
x=-200:20:500;
u2=b.*w0.*(p1.*(exp(-pi.*x.^2./r.^2)-exp(-pi.*(x-v1.*t1).^2./r.^2))+...
p2*(exp(-pi.*(x-v1*t1).^2/r.^2)-exp(-pi.*(x-2.*v1.*t1).^2/r.^2))+...
p3*(exp(-pi.*(x-2*v1*t1).^2/r.^2)-exp(-pi.*(x-3.*v1.*t1).^2/r.^2))+...
p4*(exp(-pi.*(x-3*v1*t1).^2/r.^2)-exp(-pi.*(x-4.*v1.*t1).^2/r.^2)));
figure;
plot(x,u1,'-ro',x,u2,'--mx');
xlabel('→工作面开采方向/m');
ylabel('水平移动值U/mm');
grid on
运行结果错误如下
??? Error using ==> mtimes
Inner matrix dimensions must agree.
Error in ==> shuipingyidong at 18
u2=b.*w0.*(p1.*(exp(-pi.*x.^2./r.^2)-exp(-pi.*(x-v1.*t1).^2./r.^2))+... |
|