在堆叠的条形图中添加标记

Question

在一些帮助下，我能够以一种需要的方式实现堆叠式杠铃。仅缺少一部分：代表中位数的标记。可悲的是，我无法提出任何有关添加方法的想法，也无法在互联网上找到任何帮助。这张图显示了我的图表，以及我想如何以显示的方式添加标记。不一定要那样，花一点钱或别的东西也可以做。

生成图的代码：（breite是我导入的Excel工作表。您可以使用testw并删除testw = breite来测试代码）

% testw = [0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ...
%     0.3568 0.452 0.494 0.2982 0.3892 0.675 0.576 0.489 0.745 0.225 ];
testw = breite;

%Datenvorbereitung
gerundet = round(testw,1);

maximum = max(gerundet),1;
anzahl = ceil(maximum / 0.1);

werte = zeros([1 anzahl]);
sz = size(werte);
haeufigkeit = zeros(sz);

for i= 1:anzahl
    werte(i) = 0.1*i;
end

wertebereich = zeros(sz);

for i = 1:anzahl
    wertebereich(i) = 0.1;
end

%Häufigkeitsverteilung
for i = 1:10000
    if gerundet(i) <= 0.2
        haeufigkeit(1) = haeufigkeit(1) + 1
    else
        for j = 2:anzahl
            if gerundet(i) >= werte(j-1) && gerundet(i) < werte(j)
                haeufigkeit(j) = haeufigkeit(j) + 1
            end
        end
    end
end

%Grauwerte
prozentual = zeros(sz);

for i = 1:anzahl
    prozentual(i) = haeufigkeit(i)/sum(haeufigkeit)
end

grauwerte = zeros(sz);

for i = 1:anzahl
    grauwerte(i) = round(1-1*prozentual(i),3);
end

colormap gray
b = bar([wertebereich; nan(size(wertebereich))],'stacked');
% colorbar('Direction','reverse')
colorbar('Ticks',[0, 0.2, 0.4, 0.6 ,0.8, 1],...
         'TickLabels',{'100%','80%','60%','40%','20%', '0%'})

for i = 1:anzahl
     b(1,i).FaceColor = [grauwerte(i) grauwerte(i) grauwerte(i)];
     b(1,i).EdgeColor = 'none';
end

Answer 1

如果我理解正确，只需在代码后添加以下内容：

hold on
med = median(gerundet);
plot([.5 1.5], [med med], '-', 'color', [.2 .6 1], 'linewidth', 2)