![](https://iknow-base.cdn.bcebos.com/lxb/notice.png)
求matlab高手调试程序画三维图:避雷针的防护范围模拟。 两个要求:调整修改程序代码;得出图形。有加分 20
母程序如下:xplot=linspace(-xmax,xmax,ngrid);yplot=linspace(-ymax,ymax,ngrid);[x,y]=meshgri...
母程序如下:
xplot=linspace(-xmax,xmax,ngrid);
yplot=linspace(- ymax, ymax, ngrid);
[x,y]=meshgrid(xplot);
v=giublzl( x y);
clf;figure(1);meshc(v);
xlabel(x);ylabel(y);Zlabel(高度);
title(避雷针保护范围);
figure(2),[x,y]=meshgrid(xplot) ;
contour( x,y,v,20),hold on;
xlabel(x);ylabel(y);
title(避雷针保护范围等高线)
l=input(l=);
m=input(m=);
k=input(k=);
p=v(l,m);
if k<=p,answer=‘可以保护’
else answer=‘不能保护’
end
程序可随意修改。只要最后能得到正确图形就好。
目标图形: 展开
xplot=linspace(-xmax,xmax,ngrid);
yplot=linspace(- ymax, ymax, ngrid);
[x,y]=meshgrid(xplot);
v=giublzl( x y);
clf;figure(1);meshc(v);
xlabel(x);ylabel(y);Zlabel(高度);
title(避雷针保护范围);
figure(2),[x,y]=meshgrid(xplot) ;
contour( x,y,v,20),hold on;
xlabel(x);ylabel(y);
title(避雷针保护范围等高线)
l=input(l=);
m=input(m=);
k=input(k=);
p=v(l,m);
if k<=p,answer=‘可以保护’
else answer=‘不能保护’
end
程序可随意修改。只要最后能得到正确图形就好。
目标图形: 展开
2个回答
展开全部
模拟程序
x=linspace(-18,18,200);
y=linspace(-18,18,200);
[xx,yy]=meshgrid(x,y);
v=30-sqrt(30.^2-(sqrt(30.^2-20.^2)-sqrt(xx.^2+yy.^2)).^2);
figure( 1) ;
meshc(xx,yy,v)
title('避雷针保护范围三维模拟图')
xlabel('x');
ylabel('y');
zlabel('高度')
figure( 2) ;
x=linspace(-18,18,200);
y=linspace(-18,18,200);
[xx,yy]=meshgrid(x,y);
v=30-sqrt(30.^2-(sqrt(30.^2-20.^2)-sqrt(xx.^2+yy.^2)).^2);
contour(xx,yy,v)
title('避雷针保护范围等高图模拟');
xlabel('x');
ylabel('y');
end
x=linspace(-18,18,200);
y=linspace(-18,18,200);
[xx,yy]=meshgrid(x,y);
v=30-sqrt(30.^2-(sqrt(30.^2-20.^2)-sqrt(xx.^2+yy.^2)).^2);
figure( 1) ;
meshc(xx,yy,v)
title('避雷针保护范围三维模拟图')
xlabel('x');
ylabel('y');
zlabel('高度')
figure( 2) ;
x=linspace(-18,18,200);
y=linspace(-18,18,200);
[xx,yy]=meshgrid(x,y);
v=30-sqrt(30.^2-(sqrt(30.^2-20.^2)-sqrt(xx.^2+yy.^2)).^2);
contour(xx,yy,v)
title('避雷针保护范围等高图模拟');
xlabel('x');
ylabel('y');
end
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询