agregando etiquetas de ejes xey en ggplot2

Question

¿Cómo cambio las etiquetas xey en este gráfico, por favor?

library(Sleuth2) 
library(ggplot2) 
discharge<-ex1221new$Discharge 
area<-ex1221new$Area 
nitrogen<-ex1221new$NO3 
p <- ggplot(ex1221new, aes(discharge, area), main="Point") 
p + geom_point(aes(size= nitrogen)) + 
    scale_area() + 
    opts(title = expression("Weighted Scatterplot of Watershed Area vs. Discharge and Nitrogen Levels (PPM)"), 
     subtitle="n=41") 

Answer 1

[Nota: editado para modernizar la sintaxis ggplot]

Su ejemplo no es reproducible, ya que no hay ex1221new (hay un ex1221 en Sleuth2, así que supongo que eso es lo que quería decir). Además, no necesita (y no debe) extraer columnas para enviarlas al ggplot. Una ventaja es que ggplot funciona con data.frame s directamente.

Puede establecer las etiquetas con xlab() y ylab(), o hacerla parte de la llamada scale_*.*.

library("Sleuth2") 
library("ggplot2") 
ggplot(ex1221, aes(Discharge, Area)) + 
    geom_point(aes(size=NO3)) + 
    scale_size_area() + 
    xlab("My x label") + 
    ylab("My y label") + 
    ggtitle("Weighted Scatterplot of Watershed Area vs. Discharge and Nitrogen Levels (PPM)") 

ggplot(ex1221, aes(Discharge, Area)) + 
    geom_point(aes(size=NO3)) + 
    scale_size_area("Nitrogen") + 
    scale_x_continuous("My x label") + 
    scale_y_continuous("My y label") + 
    ggtitle("Weighted Scatterplot of Watershed Area vs. Discharge and Nitrogen Levels (PPM)") 

Una forma alternativa para especificar sólo etiquetas (práctico si no va a cambiar cualquier otro aspecto de las escalas) está utilizando la función labs

ggplot(ex1221, aes(Discharge, Area)) + 
    geom_point(aes(size=NO3)) + 
    scale_size_area() + 
    labs(size= "Nitrogen", 
     x = "My x label", 
     y = "My y label", 
     title = "Weighted Scatterplot of Watershed Area vs. Discharge and Nitrogen Levels (PPM)") 

que da una identificación figura entical a la de arriba.