横向条形图（`barh`）

横向条形图（barh）

02_柱与散点　5 张　MATLAB R2023b　100 mm 宽 @ 300 dpi

这个方法适合什么

类别名较长时横向排布，标签不会被挤成竖排。适合：各馈线负载率、设备容量清单、指标排名、台区名称较长的场景。

电气场景

1　各馈线负载率

2　设备额定容量与年峰值

3　配网改造指标排名

4　主变容量已用与备用

5　各电压等级线路长度

代码

脚本 p2_bar_scatter.m 中对应 barh 的一段，SEL 用于选择只跑某几个方法。

if any(SEL==2)
    % ---- 2.1 各馈线负载率 ----
    nm = {'城东 I 回','城西 II 回','工业园 III 回','新区 IV 回','老城 V 回'};
    Y  = [88.6 61.2
          73.2 54.3
          95.4 72.8
          61.8 44.6
          82.1 59.7];
    f  = ml_fig(PP,100,80);
    ax = axes('Parent',f,'Position',[0.300 0.190 0.645 0.755]);
    hb = barh(ax,Y,'grouped');
    set(hb(1),'FaceColor',C(2,:),'EdgeColor','none');
    set(hb(2),'FaceColor',C(1,:),'EdgeColor','none');
    set(ax,'YTick',1:5,'YTickLabel',ml_tx(nm),'YTickLabelRotation',0);
    ylabel(ml_tx('10 kV 馈线'));
    xlabel(ml_tx('负载率 <i>\beta</i> / %'));
    ylim(ax,[0.4 6.8]); xlim(ax,[0 120]);
    lg = legend(ax,hb,ml_tx({'最大负载率','平均负载率'}), ...
                'Location','northeast','Orientation','horizontal');
    ml_style_legend(lg,PP);
    save_png(f,FIGD,'各馈线负载率');

    % ---- 2.2 设备额定容量与年峰值 ----
    nm = {'1 号主变','2 号主变','3 号整流变','电容器组','柴发机组'};
    Y  = [50.0 38.4
          40.0 31.2
          25.0 22.6
          12.0  8.4
           2.0  1.3];
    f  = ml_fig(PP,100,80);
    ax = axes('Parent',f,'Position',[0.300 0.190 0.645 0.755]);
    hb = barh(ax,Y,'grouped');
    set(hb(1),'FaceColor',C(5,:),'EdgeColor','none');
    set(hb(2),'FaceColor',C(6,:),'EdgeColor','none');
    set(ax,'YTick',1:5,'YTickLabel',ml_tx(nm),'YTickLabelRotation',0);
    ylabel(ml_tx('变电站主要设备'));
    xlabel(ml_tx('容量 / MV·A'));
    ylim(ax,[0.4 6.8]); xlim(ax,[0 62]);
    lg = legend(ax,hb,ml_tx({'额定容量','年峰值负荷'}), ...
                'Location','northeast','Orientation','horizontal');
    ml_style_legend(lg,PP);
    save_png(f,FIGD,'设备额定容量与年峰值');

    % ---- 2.3 配网改造指标排名 ----
    nm = {'供电可靠性','电压合格率','线损率','谐波治理','自动化水平'};
    Y  = [82.4 94.6
          88.2 97.1
          76.5 91.3
          68.4 89.7
          71.2 93.5];
    f  = ml_fig(PP,100,80);
    ax = axes('Parent',f,'Position',[0.300 0.190 0.645 0.755]);
    hb = barh(ax,Y,'grouped');
    set(hb(1),'FaceColor',[0.65 0.65 0.65],'EdgeColor','none');
    set(hb(2),'FaceColor',C(3,:),'EdgeColor','none');
    set(ax,'YTick',1:5,'YTickLabel',ml_tx(nm),'YTickLabelRotation',0);
    ylabel(ml_tx('评价指标'));
    xlabel(ml_tx('综合得分 <i>S</i> / 分'));
    ylim(ax,[0.4 6.8]); xlim(ax,[0 120]);
    lg = legend(ax,hb,ml_tx({'改造前','改造后'}), ...
                'Location','northeast','Orientation','horizontal');
    ml_style_legend(lg,PP);
    save_png(f,FIGD,'配网改造指标排名');

    % ---- 2.4 主变容量已用与备用（堆叠） ----
    nm = {'110 kV 城东站','110 kV 城西站','35 kV 工业站','35 kV 新区站'};
    Y  = [38.5 11.5
          31.2  8.8
          22.6  7.4
          15.8  9.2];
    f  = ml_fig(PP,100,80);
    ax = axes('Parent',f,'Position',[0.300 0.190 0.645 0.755]);
    hb = barh(ax,Y,'stacked');
    set(hb(1),'FaceColor',C(1,:),'EdgeColor','none');
    set(hb(2),'FaceColor',[0.85 0.85 0.85],'EdgeColor','none');
    set(ax,'YTick',1:4,'YTickLabel',ml_tx(nm),'YTickLabelRotation',0);
    ylabel(ml_tx('变电站'));
    xlabel(ml_tx('变电容量 / MV·A'));
    ylim(ax,[0.4 5.5]); xlim(ax,[0 58]);
    lg = legend(ax,hb,ml_tx({'已用容量','备用容量'}), ...
                'Location','northeast','Orientation','horizontal');
    ml_style_legend(lg,PP);
    save_png(f,FIGD,'主变容量已用与备用');

    % ---- 2.5 各电压等级线路长度（堆叠） ----
    nm = {'10 kV','35 kV','110 kV','220 kV'};
    Y  = [1280 420
           386  62
           214  38
            96  12];
    f  = ml_fig(PP,100,80);
    ax = axes('Parent',f,'Position',[0.300 0.190 0.645 0.755]);
    hb = barh(ax,Y,'stacked');
    set(hb(1),'FaceColor',C(4,:),'EdgeColor','none');
    set(hb(2),'FaceColor',C(6,:),'EdgeColor','none');
    set(ax,'YTick',1:4,'YTickLabel',ml_tx(nm),'YTickLabelRotation',0);
    ylabel(ml_tx('电压等级'));
    xlabel(ml_tx('线路长度 <i>L</i> / km'));
    ylim(ax,[0.4 5.5]); xlim(ax,[0 2050]);
    lg = legend(ax,hb,ml_tx({'架空线路','电力电缆'}), ...
                'Location','northeast','Orientation','horizontal');
    ml_style_legend(lg,PP);
    save_png(f,FIGD,'各电压等级线路长度');
end