Problem 4 Scatterplot 02

ggplot(iris, aes(Sepal.Length, Sepal.Width, shape=Species, color=Species))+
  geom_point(size=6, alpha=0.5)+
  theme_minimal()+
  labs(title = "Scatterplot", subtitle = "Sepal.Length Vs Sepal.Width", caption="Source:iris")