Commit 9d39280c authored by Holger Brandl's avatar Holger Brandl

added outlier filter

parent 09d4a81d
......@@ -157,6 +157,9 @@ replaceNA <- function(x, withValue) { x[is.na(x)] <- withValue; x }
## Deprecated: load dplyr after biomart to avoid this problem
#dselect <- function(...) dplyr::select(...)
removeOutliers <- function(values, range=quantile(values, c(0.05, 0.95))) pmax(range[1], pmin(range[2], values))
########################################################################################################################
#### File System
......
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