Skip to contents

Sign changes in diff(x) where the absolute next slope exceeds threshold. Hudgins TD feature.

Usage

morie_dsp_slope_sign_changes(x, threshold = 0)

Arguments

x

Numeric vector.

threshold

Magnitude threshold. Default 0.

Value

Integer count.

References

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

Examples

x <- c(0, 1, 0, 1, 0)
morie_dsp_slope_sign_changes(x, threshold = 0)
#> [1] 3