thêm nhãn trục x và y trong ggplot2

Làm cách nào để thay đổi các nhãn x và y trên biểu đồ này?

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

[Lưu ý: đã chỉnh sửa để hiện đại hóa cú pháp ggplot]

Ví dụ của bạn không thể tái tạo vì không có ex1221new(có một ex1221trong Sleuth2, vì vậy tôi đoán đó là ý của bạn). Ngoài ra, bạn không cần (và không nên) kéo các cột ra để gửi ggplot. Một lợi thế là nó ggplothoạt động với data.frames trực tiếp.

Bạn có thể đặt nhãn bằng xlab()và ylab()hoặc biến nó thành một phần của scale_*.*cuộc gọi.

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

Một cách thay thế để chỉ định nhãn (tiện dụng nếu bạn không thay đổi bất kỳ khía cạnh nào khác của thang đo) là sử dụng labshàm

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

cho một hình giống hệt với hình trên.