p123456q 发表于 2006-6-6 22:18

模拟心电图

% 模拟cardiogram
close all;clc;clear;
N=60;
rand('state',0);
% Author : Zhengjun Liu
S=rand(1,2*N);
pt=plot(1:N,S(1:N),'y','linewidth',2);
hold on;
plot(,,'w','linewidth',1);
set(gca,'color','b');
set(gcf,'DoubleBuffer','on');
while 1;
S(end+1)=rand;
S(1)=[];
set(pt,'YData',S(1:N));
pause(0.2);
end

[ 本帖最后由 suffer 于 2006-10-9 21:07 编辑 ]
页: [1]
查看完整版本: 模拟心电图