R/readEEM_uf.R

#' @export

readEEM_uf <- function(file, fold = TRUE){
    EEM <- read.csv(file, row.names = 1)
    if (fold) EEM <- fold(EEM)
    return(EEM)
}
chengvt/cheng documentation built on May 13, 2019, 3:52 p.m.