心电图小波，小波的检测方法

心电图小波.rar，具有小波的检测方法，有很好的应用性！

%--------------------------------------------------------------------------
% exa130203.m  例13.2.3: 利用小波变换检测R波并给出模极大曲线
%--------------------------------------------------------------------------
clear all;

ecgdata=load（‘ecg.txt‘）;
%plot（ecgdata）;
points=4000;%截取的点数
range=2:1:32;%尺度范围
sr=360;%抽样率
signal=ecgdata（1:points）‘;
figuresubplot（311）
plot（signal）axis tightgrid on;

% 对心电信号作小波变换，选‘db1‘为分析用小波
wf=‘db1‘;
subplot（312）
ccfs = cwt（signalrangewf）; 
imagesc（ccfs）;
%title（‘Continuous Transform coefficients.‘） 
colormap（gray（128））; 
%ylabel（‘Scale‘）
swd=ccfs;
ddw=zeros（size（swd））;

% 对ECG信号进行分段
pddw=ddw;
nddw=ddw;
posw=swd.*（swd>0）;
pdw=（（posw（:1:points-1）-posw（:2:points））<0）;
pddw（:2:points-1）=（（pdw（:1:points-2）-pdw（:2:points-1））>0）;
negw=swd.*（swd<0）;
ndw=（（negw（:1:points-1）-negw（:2:points））>0）;
nddw（:2:points-1）=（（ndw（:1:points-2）-ndw（:2:points-1））>0）;
ddw=pddw|nddw;
ddw（:1）=1;
ddw（:points）=1;
wpeak=ddw.*swd;
wpeak（:1）=wpeak（:1

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      48002  2003-12-03 10:21  心电图小波\ECGrbojiance\ecg.txt

     文件       2756  2004-01-29 17:16  心电图小波\ECGrbojiance\exa130203.m

     目录          0  2006-04-21 14:30  心电图小波\ECGrbojiance

     目录          0  2009-05-09 22:39  心电图小波

----------- ---------  ---------- -----  ----

                50976                    5