I do not understand why I am receiving this message:
Error in train(Medal ~ ., data = training1, method = "rf", ntree = 5) : unused arguments (data = training1, method = "rf", ntree = 5)
in my random forest algorithm. I have run a RF exactly like this before but am just now getting this error. Any ideas?
library(caret)
library(randomForest)
OlympicData <- read.csv(file.choose(), header = T)
#convert NAs in Medal column to NoMedal
levels <- levels(OlympicData$Medal)
levels[length(levels) + 1] <- "NoMedal"
OlympicData$Medal <- factor(OlympicData$Medal, levels = levels)
OlympicData$Medal[is.na(OlympicData$Medal)] <- "NoMedal"
summary(OlympicData)
#remove unnecessary columns
OlympicData <- OlympicData[, -1]
OlympicData <- OlympicData[,-1]
OlympicData <- OlympicData[, -7]
OlympicData <- OlympicData[, -6]
summary(OlympicData)
#remove remaining NAs
OlympicData[complete.cases(OlympicData),]
#train model
set.seed(33)
Data_Splitting <- createDataPartition(OlympicData$Medal, p=0.75, list=FALSE)
training1 = OlympicData[Data_Splitting,]
testing1 = OlympicData[-Data_Splitting,]
rf <- train(Medal ~., data = training1, method = "rf", ntree = 5)