plot_unit_sphere.m

来自「一个用EM算法的源程序」· M 代码 · 共 16 行

% plot_unit_sphere
% Plot a wiremesh of the unit sphere onto the current axes.
function out = plot_sphere(varargin);

if nargin > 0,
    pointCount = varargin{1};
else, 
    pointCount = 20;
end

[sphereX, sphereY, sphereZ] = sphere(pointCount);
mesh(sphereX, sphereY, sphereZ, 1*ones(pointCount,pointCount));
hidden off;
axis equal;
colormap(colorcube)