Loading Data

pacman::p_load(ggplot2,caTools,dplyr)
rm(list=ls(all=TRUE))
Sys.setlocale("LC_TIME","C")
## [1] "C"
load("../unit15/data/tf0.rdata")
load("../unit15/data/tf3.rdata")