# Predictive Analytics on Chocolate Data

### This script shows only the application of predictive statistics
### The datasets are the final chocolateData and summary dataframes

### Load datafiles into datasets

chocolateData<-read.csv("ChocolateDataAnalysis.csv",stringsAsFactors = TRUE)
summary<-read.csv("SummaryData.csv",stringsAsFactors = TRUE)