R/do_medcenter_norm.R

Defines functions do_medcenter_norm

do_medcenter_norm <-
function(data_m)
{
  colmedians=apply(data_m,1,function(x){median(x,na.rm=TRUE)})
  data_m=sweep(data_m,1,colmedians)
  return(data_m)
  
}
kuppal2/xmsPANDA documentation built on May 15, 2021, 5:48 a.m.