Hey so I've ran the following code from a dataset I loaded. I keep getting the same error on the last 2 lines and am not sure how to fix it. Any suggestions?
setwd("Downloads")
pitcher = read.csv("FanGraphs Leaderboard (27).csv",fileEncoding = "UTF-8-BOM")
attach(pitcher)
str(pitcher)
cor(subset(pitcher,select=-c(Season,Name,Team,playerid)))
goodColumns = c("W","L","IP","ER","HR","BB","SO","WAR")
library(caret)
inTrain = createDataPartition(pitcher$WAR,p=0.7,list=FALSE)
training <- data[inTrain,goodColumns]
testing = data[-inTrain,goodColumns]
Thanks