matlab

function suishituplot(data)
close all;
[m,n]=size(data);
xmax=m+1;
ymax=max(data(:))+1;
colo=colour();
for i=1:n
    hn=plot(data(:,i));
    fig_name='碎石图';
    fig_title='碎石图';
    xlabel_name='成分数';
    ylabel_name='特征值';
    filename='总碎石图.png';
    figplot(hn,fig_name,fig_title,xlabel_name,ylabel_name);
    set(hn,'color',colo(i,:));
    %	set(hn,'Marker','o','MarkerEdgeColor','b');
    hold on;
end
hold off;
xlim([0,xmax]);
ylim([-1,ymax]);
% axis auto;
export_fig(filename);