Zwei geom_points fügen eine Legende hinzu

Question

Jul 18, 2013, 05:18 AM

Zwei geom_points fügen eine Legende hinzu

Ich zeichne ein 2 Geom_point-Diagramm mit dem folgenden Code:

source("http://www.openintro.org/stat/data/arbuthnot.R")
library(ggplot2)
ggplot() +
  geom_point(aes(x = year,y = boys),data=arbuthnot,colour = '#3399ff') +
  geom_point(aes(x = year,y = girls),data=arbuthnot,shape = 17,colour = '#ff00ff') +
  xlab(label = 'Year') +
  ylab(label = 'Rate')

Ich möchte einfach wissen, wie man eine Legende auf der rechten Seite hinzufügt. Mit der gleichen Form und Farbe. Dreieckrosa sollte die Legende "Frau" haben und blauer Kreis die Legende "Männer". Scheint ganz einfach, aber nach vielen Versuchen konnte ich es nicht tun. (Ich bin ein Anfänger mit ggplot).