ggplot2にx軸とy軸のラベルを追加する

このグラフのxラベルと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")

[注：ggplot構文を最新化するために編集されました]

あなたの例はないので再現可能ではありませんex1221new（ex1221in Sleuth2があるので、それがあなたの意図したことだと思います）。また、に送信するために列を引き出す必要はありません（必要もありません）ggplot。一つの利点はあるggplotと作品data.frameを直接秒。

xlab()とylab()でラベルを設定するか、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)")

ラベルのみを指定する別の方法（スケールの他の側面を変更しない場合に便利）は、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)")

上記と同じ図になります。