menambahkan label sumbu x dan y di ggplot2

Bagaimana cara mengubah label x dan y pada grafik ini?

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")

[Catatan: diedit untuk memodernisasi sintaks ggplot]

Contoh Anda tidak dapat direproduksi karena tidak ada ex1221new(ada yang ex1221masuk Sleuth2, jadi saya rasa itulah yang Anda maksudkan). Selain itu, Anda tidak perlu (dan tidak seharusnya) menarik kolom untuk dikirim ggplot. Satu keuntungan adalah ggplotbekerja dengan data.frames secara langsung.

Anda dapat menyetel label dengan xlab()dan ylab(), atau menjadikannya bagian dari scale_*.*panggilan.

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)")

Cara alternatif untuk menentukan label saja (berguna jika Anda tidak mengubah aspek lain dari skala) menggunakan labsfungsi ini

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)")

yang memberikan angka yang identik dengan yang di atas.