Formato de leyenda en R: ¿qué sale mal?

Question

Estoy intentando obtener una leyenda correcta para una serie de puntos en un gráfico, que se ve así:

plot(c(3,1),pch=21,bg="white",col="black")
points(c(2,1),pch=21,bg="black",col="black")
points(c(1,1),pch=21,bg="dark grey",col="black")

Pensé que el código de la leyenda sería:

legend("topright",legend=c('Point3','Point2','Point1'),pch=c(21,21,21),
       bg=c('white','black','dark grey'),col=c('black','black','black'),bty='n')

Pero aparentemente me equivoco, porque sólo obtengo tres puntos blancos con borde negro.¿Por qué no funciona y cuál es el código correcto?

Answer 1

Si tu lees help("legend") descubres que bg especifica el fondo de la leyenda.Necesitas usar pt.bg:

legend("topright", legend=c('Point3','Point2','Point1'), pch=c(21,21,21),
     pt.bg=c('white','black','dark grey'), col=c('black','black','black'), bty='n')