#(1)散布図
ggplot()+
  geom_point(data = iris, mapping = aes(x = Sepal.Length, y = Sepal.Width))

#(2)折れ線
ggplot()+
  geom_line(data = iris, mapping = aes(x = Sepal.Length, y = Sepal.Width))

#(3)散布図+折れ線
ggplot()+
  geom_point(data = iris, mapping = aes(x = Sepal.Length, y = Sepal.Width))+
  geom_line(data = iris, mapping = aes(x = Sepal.Length, y = Sepal.Width))

#(4)散布図 species毎に色分け
ggplot()+
  geom_point(data = iris, mapping = aes(x = Sepal.Length, y = Sepal.Width , colour = Species))