毕设（正文）

南昌航空大学学士学位论文

if (rvalue(i)-rvalue(i-1))<100

if yabs(rvalue(i))>yabs(rvalue(i-1)) rvalue(i-1)=0; else

rvalue(i)=0; end; end; end;

%排除误检，如果相邻两个极大值间距大于1.2，则复检 rvalue=sort(rvalue); id = find(rvalue==0) ; rvalue(id,:)=[]; N4=length(rvalue); for j=1:20 for i=2:N4

if (rvalue(i)-rvalue(i-1)) > 300 for jj= rvalue(i-1): rvalue(i)-1 if sigmax(jj,1) > sigmax(jj+1,1) B=sigmax(jj,2); else B=sigmax(jj+1,2); end end

c1=rvalue(1:i-1);c2=rvalue(i:N3); rvalue=[c1;B;c2]; end end end

r1=find(rvalue~=0); rvalue=rvalue(r1);

lenvalue=length(rvalue); end

%打印纠正及校准前后的R波信号 axes(handles.axes2);

plot(1:lensig,wtsig1,rvalue_1,wtsig1(rvalue_1),'r.'); axes(handles.axes1);

plot(1:lensig,sig,rvalue,sig(rvalue),'r.'); lenr=length(rvalue);

v=60/4*1000*(lenr-1)/(rvalue(lenr)-rvalue(1)) m=floor(v);

set(handles.text5,'string',m);

34