Commit f88078bd authored by Holger Brandl's avatar Holger Brandl

fixed: invalid data reference in `trim_outliers`

parent 662f183a
......@@ -556,7 +556,7 @@ lsosh <- function(..., n=10) {
## outlier handling
trim_outliers <- function(values, probs=c(0.05, 0.95)){
values = deResults$pvalue
# values = deResults$pvalue
stopifnot(length(probs) == 2)
quantiles = quantile(values, probs, na.rm = TRUE)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment