TeamSJK

# Load libraries.
library(ggplot2);
library(caret);
library(gridExtra);

set.seed(100);

# Load our data.
child <- read.csv("childcare_dataset/childcare_dataset.csv", stringsAsFactors = FALSE);
head(child);