Displaying Results of Polyr
function showpolygons(faces,vertices)
patches =patch('faces',faces,'vertices',vertices,...
'FVCData',ones(size(vertices,1),1)*[0.8 0.8 0.8],...
'FaceColor', 'interp’, 'EdgeColor','none');
l1 = light('position',[-1 -1 .1],'color',[.3 .3 .3]);
l2 = light('position',[1 -1 .1],'color',[.3 .3 .3]);
l3 = light('position',[-.5 1 .1],'color',[.3 .3 .3]);
l4 = light;material([.05 .4 .1 10]);