[Uwaga: edytowano w celu unowocześnienia składni ggplot]
Twój przykład nie jest powtarzalny, ponieważ nie ma ex1221new(jest ex1221in Sleuth2, więc myślę, że to miałeś na myśli). Ponadto nie musisz (i nie powinieneś) wyciągać kolumn, aby je wysłać ggplot. Jedną z zalet jest to, że ggplotdziała data.framebezpośrednio z s.
Możesz ustawić etykiety za pomocą xlab()i ylab()lub uczynić je częścią scale_*.*połączenia.
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)")

Alternatywnym sposobem określenia samych etykiet (przydatnym, jeśli nie zmieniasz żadnych innych aspektów skali) jest użycie labsfunkcji
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)")
co daje identyczną liczbę jak powyżej.