130

このグラフの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")
4

2 に答える 2

202

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

あなたの例はないので再現できませんex1221new（中ex1221にSleuth2あるので、それがあなたの意図したことだと思います）。また、に送信するために列を引き出す必要はありません（また、そうすべきではありません）ggplot。1つの利点は、sと直接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)")

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

于 2012-05-03T22:57:41.707 に答える
1

ex1221newのデータが与えられていないので、ダミーデータを作成してデータフレームに追加しました。また、尋ねられた質問には、ggplotパッケージのようなコードの変更がほとんどありません。

"scale_area()" and nows uses scale_size_area()
"opts()" has changed to theme()

私の答えでは、プロットをmygraph変数に保存してから、

mygraph$labels$x="Discharge of materials" #changes x axis title
       mygraph$labels$y="Area Affected" # changes y axis title

そして、作業は完了です。以下が完全な答えです。

install.packages("Sleuth2")
library(Sleuth2)
library(ggplot2)

ex1221new<-data.frame(Discharge<-c(100:109),Area<-c(120:129),NO3<-seq(2,5,length.out = 10))
discharge<-ex1221new$Discharge
area<-ex1221new$Area
nitrogen<-ex1221new$NO3
p <- ggplot(ex1221new, aes(discharge, area), main="Point")
mygraph<-p + geom_point(aes(size= nitrogen)) + 
  scale_size_area() + ggtitle("Weighted Scatterplot of Watershed Area vs. Discharge and Nitrogen Levels (PPM)")+
theme(
 plot.title =  element_text(color="Blue", size=30, hjust = 0.5), 

 # change the styling of both the axis simultaneously from this-
 axis.title = element_text(color = "Green", size = 20, family="Courier",)
 

   # you can change the  axis title from the code below
   mygraph$labels$x="Discharge of materials" #changes x axis title
   mygraph$labels$y="Area Affected" # changes y axis title
   mygraph

また、上記で使用したのと同じ式からラベルのタイトルを変更できます-

mygraph$labels$size= "N2" #size contains the nitrogen level
于 2020-10-19T15:06:17.897 に答える