R/Labels.r

Defines functions mp_belabelung

mp_belabelung <- function(data) {
    namelist <- list()
    for(i in 1:ncol(data)) {
        data <- as.data.frame(unique(data[,i]))
        colnames(data) <- NULL
        namelist[[i]] <- data
    }
    return(namelist)
}
MarkusLang1987/MPCodes documentation built on May 17, 2019, 6:21 p.m.