R/scalingfn.R

Defines functions scalingfn

Documented in scalingfn

scalingfn <-
function(Y,type){
  tY=t(Y)
  if(type=="pareto"){
    sdY=rowVar(tY)^(.25)
    tY=tY/sdY}
  if(type=="unit"){
    sdY=rowVar(tY)^(.5)
    tY=tY/sdY}
  if(type=="none"){tY=tY}
  return(Y=t(tY))}
gnyamundanda/exploBATCH documentation built on May 20, 2019, 3:31 p.m.