jmalbornoz

Scenario	CV Training Score	CV Validation Score	Training Score	Validation Score
No Resampling	0.48	0.36	0.48	0.19
Random Upsampling	0.78	0.27	0.72	0.15
SMOTE Upsampling	0.45	0.29	0.43	0.19
Random Downsampling	0.04	0.03	0.12	0.08
SMOTE + Tomek Links	0.48	0.30	0.37	0.18

jmalbornoz

Scenario	CV Training Score	CV Validation Score	Training Score	Validation Score
No Resampling	0.42	0.16	0.35	0.31
Random Upsampling	0.43	0.16	0.33	0.20
SMOTE Upsampling	0.22	0.11	0.21	0.31
Random Downsampling	0.06	0.04	0.015	0.017
SMOTE + Tomek Links	0.21	0.12	0.22	0.27

jmalbornoz

library(ggplot2)
library(scales)

# load data:
log <- data.frame(Date = c("2013/05/25","2013/05/28","2013/05/31","2013/06/01","2013/06/02","2013/06/05","2013/06/07"), 
  Quantity = c(9,1,15,4,5,17,18))
log
str(log)

# convert date variable from factor to date format: