R/proteomicsCV.R

In proteomicsCV: Calculates the Percentage CV for Mass Spectrometry-Based Proteomics Data

Defines functions protCV protLogCV

Documented in protCV protLogCV

#' @importFrom stats sd
#' @export
protLogCV<-function(logData, base){
  val=log(base)
  data=logData*val
  cv=apply(data, 1, function(x) sqrt(exp(stats::sd(x, na.rm = TRUE)^2)-1))*100
  cv
}

#' @export
protCV<-function(data){
    cv=apply(data, 1, function(x) sd(x, na.rm = TRUE)/mean(x, na.rm = TRUE))*100
}

Try the proteomicsCV package in your browser