## Not run:
# data(iris)
# TrainData <- iris[,1:4]
# TrainClasses <- iris[,5]
#
# knnFit1 <- train(TrainData, TrainClasses,
# method = "knn",
# preProcess = c("center", "scale"),
# tuneLength = 10,
# trControl = trainControl(method = "cv"))
#
# update(knnFit1, list(.k = 3))
# ## End(Not run)
Run the code above in your browser using DataCamp Workspace