jkl1337/EcgSynKit
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix rrprocess in original ecgsyn code

Browse Source
This commit is contained in:
John K. Luebs
2024-10-26 00:11:23 -05:00
parent c27b1f41bf
commit 8c51316f82
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
ecgsyn-1.0.0/Matlab/ecgsyn.m
View File

@@ -181,7 +181,7 @@ dw2 = w-w2;
Hw1 = sig1*exp(-0.5*(dw1/c1).^2)/sqrt(2*pi*c1^2); Hw1 = sig1*exp(-0.5*(dw1/c1).^2)/sqrt(2*pi*c1^2);
Hw2 = sig2*exp(-0.5*(dw2/c2).^2)/sqrt(2*pi*c2^2); Hw2 = sig2*exp(-0.5*(dw2/c2).^2)/sqrt(2*pi*c2^2);
Hw = Hw1 + Hw2; Hw = Hw1 + Hw2;
Hw0 = [Hw(1:n/2); Hw(n/2:-1:1)]; Hw0 = [Hw(1:n/2+1); Hw(n/2:-1:2)];
Sw = (sfrr/2)*sqrt(Hw0); Sw = (sfrr/2)*sqrt(Hw0);
ph0 = 2*pi*rand(n/2-1,1); ph0 = 2*pi*rand(n/2-1,1);