corob.m

生成三维模型异常体填充文件

function corob(x,y,z,cs,col)
x0=x-cs(1)/2;
x1=x+cs(1)/2;
y0=y-cs(2)/2;
y1=y+cs(2)/2;
z0=z-cs(3)/2;
z1=z+cs(3)/2;
x=[x0 x1 x1 x0 x0 x0; x0 x1 x1 x0 x1 x1; x1 x1 x0 x0 x1 x1; x1 x1 x0 x0 x0 x0];
y=[y0 y0 y1 y1 y0 y0; y0 y0 y1 y1 y0 y0; y0 y1 y1 y0 y1 y1; y0 y1 y1 y0 y1 y1];
z=[z0 z0 z0 z0 z0 z1; z1 z1 z1 z1 z0 z1; z1 z1 z1 z1 z0 z1; z0 z0 z0 z0 z0 z1];
hp=patch(x,y,z,col);
%set(hp,'edgecolor','none')
%set(hp,'edgecolor',[0.4 0.4 0.4]);