function DrawAvg % DrawAvg.m % Author: Alexander Khaustov; alexander dot khaustov at gmail dot com % Copyright (C) 2008 St.-Petersburg Institute of Cardiological Technics (Incart), www.incart.ru % This software is released under the terms of the GNU General % Public License (http://www.gnu.org/copyleft/gpl.html). % % Draws the MMA averages global TWARes graph lead CurResIndex Align subplot(graph(2)); cla; hold on; if (~TWARes.successfull || ~TWARes.res(CurResIndex).validleads(lead)) return; end; colors = {'b', 'g'}; for i = 1:2 qsa = TWARes.res(CurResIndex).Avg(i, lead).qs_avg; sta = TWARes.res(CurResIndex).Avg(i, lead).st_avg; h(i) = plot(qsa, colors{i}); ind = length(qsa) + 10; plot(ind:(ind + length(sta) - 1), sta, colors{i}); end; x = TWARes.res(CurResIndex).VAltPt(lead) + ind - 1; h(3) = plot([x x], get(gca, 'YLim'), 'm'); % points after this one are taken into account % x = Align.q2f(CurResIndex) + Align.f2s(CurResIndex); % plot([x x], get(gca, 'YLim'), 'r'); legend(h, 'even beat avg', 'odd beat avg', 'point of max alternans', 2) hold off return;