
Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
t_var <- rnorm(20)
lower <- stats::quantile(t_var, prob = .2, na.rm = TRUE)
upper <- stats::quantile(t_var, prob = .8, na.rm = TRUE)
t_val <- seq(from = lower, to = upper, by = (upper - lower) / 20)
compare_thresholds(t_val, t_var)
# }
Run the code above in your browser using DataLab