号令行键入:
[px,py,pz] = sphere(50);
%生当作50×50球体的坐标
号令行键入:
cla
sEarth = surface(py, px ,flip(pz));
sEarth.FaceColor = 'texturemap';
% 将颜色设置为纹理映射
号令行键入:
sEarth.EdgeColor = 'none';
% 去除概况边缘颜色
号令行键入:
sEarth.CData = sEarth;
% 设置颜色数据
号令行键入:
hold on
sCloud = surface(px*1.02,py*1.02,flip(pz)*1.02);
%连结,并绘图。
号令行键入:
sCloud.FaceColor = 'texturemap';
%将颜色设置为纹理映射
号令行键入:
sCloud.EdgeColor = 'none';
% 去除概况边缘颜色
号令行键入:
sCloud.CData = clouds;
%设置颜色数据
号令行键入:
sCloud.FaceAlpha = 'texturemap';
% 设置纹理映射的透明度
号令行键入:
sCloud.AlphaData = max(clouds,[],3);
%设置透明度数据
号令行键入:
hold off
%连结图形。
号令行键入:
sCloud.FaceAlpha = 'texturemap';
sCloud.AlphaData = max(clouds,[],3);
hold off
%设置属性。
号令行键入:
view([80 2])
%指定视点
号令行键入:
daspect([1 1 1])
% 设定长宽比
axis off tight
% 删除轴并设置数据规模的限制
END0 篇文章
如果觉得我的文章对您有用,请随意打赏。你的支持将鼓励我继续创作!