Skip to contents

sqrt(2) for a pure sine; large values indicate spiky waveforms.

Usage

morie_dsp_crest_factor(x)

Arguments

x

Numeric vector.

Value

Scalar.

References

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

Examples

t <- seq.int(0, 9999) / 10000
x <- sin(2 * pi * 5 * t)
morie_dsp_crest_factor(x)  # ~sqrt(2) for a unit sine
#> [1] 1.414214