uci-ml-to-r/data-collection/indian-liver/preprocess.R

preprocessDataset = function()
{   
    csv.file = "Indian Liver Patient Dataset (ILPD).csv"
    
    dataset = read.csv(paste0(orig.dir, "/", csv.file),
                       header=FALSE)
    
    colnames(dataset) = c("Age", "Gender", "TB", "DB", "Alkphos", "Sgpt", 
                          "Sgot", "TP", "ALB", "A/G Ratio", "Selector")
    
    dataset = dataset %>% mutate(Selector=factor(Selector))

    return(dataset)
}