% readdata.m read PPG data and annotation from database record from the
% begintime to the stoptime
function [d ann a]=readdata(datanumber,annname,PPG_lead,begintime,stoptime)
if nargin<5
stoptime = [];
end
if nargin<4
begintime = ['00:00:00'];
end
if nargin<3
fprintf('Error: must provide datanumber, annotation name and PPG_lead');
return;
end
if length(stoptime)==0
r=rdsamp(datanumber,'begin',begintime,'sigs',PPG_lead);
else
r=rdsamp(datanumber,'begin',begintime,'stop',stoptime,'sigs',PPG_lead);
end
if length(r)>0
d=r(:,2);
for i=1:length(d)
if d(i)<-32700
if (i)==1
d(i)=0;
else
d(i)=d(i-1);
end
end
end
else
d=[];
end
if length(stoptime)==0
a=rdann(datanumber,annname,'start',begintime);
else
a=rdann(datanumber,annname,'start',begintime,'stop',stoptime);
end
if length(a)<1
ann=[];
end
for i=1:length(a)
ann(i)=a(i).sampleNumber;
end