Commit 67cac121 authored by Holger Brandl's avatar Holger Brandl

cont. qpcr analysis

parent c6b2fa04
......@@ -158,7 +158,10 @@ replaceNA <- function(x, withValue) { x[is.na(x)] <- withValue; x }
## Deprecated: load dplyr after biomart to avoid this problem
#dselect <- function(...) dplyr::select(...)
trimOutliers <- function(values, range=quantile(values, c(0.05, 0.95))) pmax(range[1], pmin(range[2], values))
## outlier handling
trim_outliers <- function(values, range=quantile(values, c(0.05, 0.95))) pmax(range[1], pmin(range[2], values))
limit_range <- function(values, range) pmax(range[1], pmin(range[2], values))
......
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