MATLAB的一个程序,运行出错,画不出图,求大牛!程序如下：AA=0;0.1;5;rr=0.1:0.1:100;[A,r]=meshgrid(A,r);B=90-A;u=0.3;m=70;g=9.8;v0=15;h=2;k=sqrt(tand(B).^2+1);b=r*(1-1/k);a=r*(sind(B)/cosd(B))/E;v1=v0*v0+2*g*(h-b)-2*u*g*(sind(B)/cosd(B

MATLAB的一个程序,运行出错,画不出图,求大牛!程序如下：AA=0;0.1;5;rr=0.1:0.1:100;[A,r]=meshgrid(A,r);B=90-A;u=0.3;m=70;g=9.8;v0=15;h=2;k=sqrt(tand(B).^2+1);b=r*(1-1/k);a=r*(sind(B)/cosd(B))/E;v1=v0*v0+2*g*(h-b)-2*u*g*(sind(B)/cosd(B
MATLAB的一个程序,运行出错,画不出图,求大牛!程序如下：
AA=0;0.1;5;
rr=0.1:0.1:100;
[A,r]=meshgrid(A,r);
B=90-A;
u=0.3;
m=70;
g=9.8;
v0=15;
h=2;
k=sqrt(tand(B).^2+1);
b=r*(1-1/k);
a=r*(sind(B)/cosd(B))/E;
v1=v0*v0+2*g*(h-b)-2*u*g*(sind(B)/cosd(B))*(h-b);
c=(m*v1/r+m*g*sind(A)-3*m*g*(2*m*cosd(A)+sind(A))/(1+4*m*m))/(exp(-2*u*A));
V2=6*g*r*m*(2*m*sind(A)-cosd(A))/(1+4*m*m)-c*exp(-2*u*A)/(m*u)-6*g*r*m*2*m/(1+4*m*m)+c*exp(-2*u*pi/2)/(m*u)+2*g*b+v1;
v2=sqrt(V2);
mesh(A,r,v2)
补充：A的范围如上,r大于0即可,画：A,r,v2的图,公式部分检查过没大错.

MATLAB的一个程序,运行出错,画不出图,求大牛!程序如下：AA=0;0.1;5;rr=0.1:0.1:100;[A,r]=meshgrid(A,r);B=90-A;u=0.3;m=70;g=9.8;v0=15;h=2;k=sqrt(tand(B).^2+1);b=r*(1-1/k);a=r*(sind(B)/cosd(B))/E;v1=v0*v0+2*g*(h-b)-2*u*g*(sind(B)/cosd(B
clear;clc
AA=0.1:0.1:5; % 已改
rr=0.1:0.1:100;
[A,r]=meshgrid(AA,rr);
B=90-A;
u=0.3;
m=70;
g=9.8;
v0=15;
h=2;
k=sqrt(tand(B).^2+1); %以下几行已改,都少 点
b=r.*(1-1./k);
a=r.*(sind(B)./cosd(B))./B; % 这个 E 是什么
v1=v0.*v0+2*g*(h-b)-2*u*g*(sind(B)./cosd(B)).*(h-b);
c=(m*v1./r+m*g*sind(A)-3*m*g*(2*m*cosd(A)+sind(A))/(1+4*m*m))./(exp(-2*u*A));
V2=6*g*r*m.*(2*m*sind(A)-cosd(A))/(1+4*m*m)-c.*exp(-2*u*A)/(m*u)-6*g*r*m*2*m/(1+4*m*m)+c*exp(-2*u*pi/2)/(m*u)+2*g*b+v1;
v2=sqrt(V2);
mesh(A,r,v2)