function plot_disagreement_lst(disagreement_lst_summary, subject)

disagreement_lst_summary = sortrows(disagreement_lst_summary,[1 2]);
old_confusion = disagreement_lst_summary{1,1};
n_confusion=1;
n_confused=1;
confusion_sounds{1,n_confusion}=old_confusion;
Y(n_confusion,n_confused)=disagreement_lst_summary{1,3};
for i=2:length(disagreement_lst_summary)
    confusion=disagreement_lst_summary{i,1};
    if confusion==old_confusion
        n_confused=n_confused+1;
    else
        n_confusion=n_confusion+1;
        confusion_sounds{1,n_confusion}=confusion;
        n_confused=1;
    end    
    Y(n_confusion,n_confused)=disagreement_lst_summary{i,3};
    old_confusion = confusion;
end

bar(Y,'stacked');
title('List of Disagreement')
xlabel('Sounds')
ylabel('Count of Differences between Examiner and Transcriber')
set(gca,'XTick',1:length(Y),'XTickLabel',confusion_sounds,'Fontsize',16);
fname = sprintf('stackedbar_transciber_diff_%s.eps', subject);
print(gcf, fullfile('graphics', fname), '-depsc2'); 

