Sign changes in diff(x) where the absolute next slope exceeds
threshold. Hudgins TD feature.
Examples
x <- c(0, 1, 0, 1, 0)
morie_dsp_slope_sign_changes(x, threshold = 0)
#> [1] 3
Sign changes in diff(x) where the absolute next slope exceeds
threshold. Hudgins TD feature.
x <- c(0, 1, 0, 1, 0)
morie_dsp_slope_sign_changes(x, threshold = 0)
#> [1] 3