R/getFACT.R

Defines functions getFACT

#get factors after find bars

getFACT <- function(bars){
  if(length(bars)==1){
    return(NULL)
  }
  else{
    c(bars[[3]], getFACT(bars[[2]]))
  }
}
jaromilfrossard/lme4permuco documentation built on May 26, 2019, 4:42 p.m.