Form factor (RMS / mean-absolute)

1.11 for a pure sine; deviations diagnose waveshape changes.

Usage

morie_dsp_form_factor(x)

Arguments

x

Numeric vector.

Value

Scalar.

References

Rangayyan & Krishnan (2015), Ch. 5, sec. 5.2.

Examples

t <- seq.int(0, 999) / 1000
x <- sin(2 * pi * 5 * t)
morie_dsp_form_factor(x)
#> [1] 1.110812
morie_dsp_form_factor(rep(0, 5))  # all-zero signal: 0
#> [1] 0