Zwei geom_points Legende hinzufügen

Ich Plane eine 2 geom_point Grafik 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')

Möchte ich einfach nur wissen, wie Sie eine Legende auf der rechten Seite. Mit der gleichen Form und Farbe. Dreieck rosa soll die Legende von "Frau" und dem blauen Kreis, die Legende "Männer". Scheint ganz einfach, aber nach vielen trial-ich konnte es nicht tun. (Ich bin ein Anfänger mit ggplot).

Zwei geom_points Legende hinzufügen

InformationsquelleAutor S12000 | 2013-07-18
Schreibe einen Kommentar