柱状图统计执行率

zouqilee

clc   
clear
set(gcf,'Position',[50 200 760 550]);%%以台站运行率为横坐标台站名为纵坐标出图使用
pth='E:\runrate\';
dir1=dir([pth  '*.txt' ]);
fnm1={dir1.name};
n=length(fnm1);
for i=1:n
    file=cell2mat(fnm1(i));
    idx=strfind(file,'.');
    par(i).stn=file(idx(1)+1:idx(2)-1);
    fst=[pth file];
    fid=fopen(fst,'r');
         
         while ~feof(fid)
           str=fgets(fid);
         end
           par(i).percent=str2num(str(1:length(str)));                     
end
for j=1:n
    percent(j)=roundn(par(j).percent,-2);
    per(j).per=num2str(percent(j));
    txt(j).txt=[par(j).stn ' (' per(j).per '%)'];
end
if length(percent)==1   
   percent(2)=0;%防止一个柱状图画不出来
end
b=barh(percent,0.2,'b');
Yti=[1:n];
xlim([0 100]);
ylim([0 n+1]);
set(gca,'Ytick',Yti,'YTickLabel',{txt.txt},'FontSize',15);
set(gca, 'XGrid','on');% X轴的网格
xlabel('执行率（%）','fontsize',22)
ylabel('分类号','fontsize',22)