### For getting stats tables rounded to two digits:
write.csv(as.data.frame.matrix(round(confusion_RF$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/RF_stats_round.csv")
write.csv(as.data.frame.matrix(round(confusion_ada$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/ada_stats_round.csv")
write.csv(as.data.frame.matrix(round(confusion_ada_cv$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/ada_cv_stats_round.csv")
write.csv(as.data.frame.matrix(round(confusion_bagging$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/bagging_stats_round.csv")
write.csv(as.data.frame.matrix(round(confusion_bagging_cv$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/bagging_cv_stats_round.csv")
write.csv(as.data.frame.matrix(round(confusion_samme$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/samme_stats_round.csv")
write.csv(as.data.frame.matrix(round(confusion_svms$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/svms_stats_round.csv")
write.csv(as.data.frame.matrix(round(confusion_CDA$byClass, digits = 2)), file = "C:/Users/jdmunyon/Desktop/Dropbox/Senior_Project/data_and_code/results/50_50/CDA_stats_round.csv")