# Adding another variable 'Species' and indicate 'Species' using color
# Write your answer here
ggplot(data = newdata, mapping = aes(x = Petal.Length, y = Petal.Width, shape = Species)) + geom_point() + theme(plot.background = element_rect(fill = "lightblue", colour = "black"))
# Load ggplot
library(ggplot2)
# Read in dataset
data(iris)
p <- ggplot(iris, aes(Sepal.Length, Petal.Length, colour=Species)) + geom_point()
p
```
`
