Publications by Arif

Practical Machine Learning Week 3

library(tidyverse) library(caret) library(rattle) data("iris") table(iris$Species) setosa versicolor virginica 50 50 50 inTrain <- createDataPartition(iris$Species, p = 0.7, list = FALSE) training <- iris[inTrain, ] testing <- iris[-inTrain, ] qplot(Petal.Width, Sepal.Width, col = Species, data = training) m...

5200 sym R (5891 sym/33 pcs) 9 img