fix rrprocess in original ecgsyn code

This commit is contained in:
2024-10-26 00:11:23 -05:00
parent c27b1f41bf
commit 8c51316f82

View File

@@ -181,7 +181,7 @@ dw2 = w-w2;
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);
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);
ph0 = 2*pi*rand(n/2-1,1);