Matlab 版 (精华区)

文件名是filll2.m 
以下是文件内容

function filll2(x,y,C);
%fill
% for k=1:length(x);
%     p=x(k);
%     q=y(k);
%     fill([p,p+1,p+1,p,p],[q,q,q+1,q+1,q],C,'erasevode','none');
% end

plot(x(1)+0.5,y(1)+0.5,'s','varkerFaceColor','r','varkeredgeColor','r',...
'erasevode','none')
    
plot(x(2:end)+0.5,y(2:end)+0.5,'s','varkerFaceColor',C,'varkeredgeColor',C,...
'erasevode','none')