Solution:
data(iris)
dataset<-iris
library(caret)
x<-dataset[,1:4]
y<-dataset[ ,5]
library(dplyr)
library(ggplot2)
dataset %>% ggplot(aes(x=y)) + geom_bar() + labs(x = "Iris Flower Species")
scales<-list(x = list(relation = "free"), y = list(relation = "free"))
featurePlot(x = x, y = y, plot = "density", scales = scales)
0 Comments