Time-domain centre of energy: sum(t * x^2) / sum(x^2).
Usage
morie_dsp_centroidal_time(x, fs = 1)
Arguments
- x
Numeric vector.
- fs
Sampling frequency (Hz). Default 1.
References
Rangayyan & Krishnan (2015), Ch. 5.
Examples
x <- abs(sin(seq(0, 2 * pi, length.out = 200L)))
morie_dsp_centroidal_time(x, fs = 1)
#> [1] 99.5