R/normalize.R

In cbreenmachine/Rray: Utility functions for analyzing EPIC 850K array data, to stay consistent across projects / platforms.

#' @export
normalize <- function(RGset, method){
  if (method == "noob") {
    mSetProcessed <- preprocessNoob(RGset)
  } else if  (method == "swan"){
    mSetProcessed <- preprocessSWAN(RGset)
  } else {
    error("Specify noob or swan!")
  } 
  return(mSetProcessed)
}