devel/run_failing_logspline.R

x <- rep(0, 100)
th <- find_threshold(x, method="valleys")
th; plot(th)

rm(th); th <- find_threshold(x, method="nmm")
th; plot(th)

rm(th); th <- find_threshold(x, method="entropy")
th; plot(th)

rm(th); th <- find_threshold(x, method="rosin")
th; plot(th)
benmack/threshold documentation built on May 12, 2019, 12:58 p.m.