SNR improvement attributable to a filter (dB)

Compares SNR of (clean vs. clean-noisy) before filtering with SNR of (clean vs. clean-filtered) after; positive values mean the filter reduced noise relative to clean.

Usage

morie_dsp_snr_improvement(x_noisy, x_clean, x_filtered)

Arguments

x_noisy

Observed noisy vector.

x_clean

Clean reference.

x_filtered

Filter output.

Value

Delta SNR in dB.

References

Rangayyan & Krishnan (2015), Ch. 3, sec. 3.2.

Examples

set.seed(1L)
clean <- sin(2 * pi * seq(0, 1, length.out = 256))
noisy <- clean + rnorm(256, sd = 0.3)
filt <- morie_dsp_moving_average(noisy, window = 7L)
morie_dsp_snr_improvement(noisy, clean, filt)
#> [1] 8.749922