clf;
clear all;

load e:\mepps mepp

time = linspace(0,.1,1000);

plot(time,mepp(:,100),'r','linewidth',2) %reference mepp
hold on

avgmepp = sum(mepp,2)/100;
plot(time,avgmepp,'b','linewidth',2)
legend('noiseless reference','incorrect averaging')
