将 geom_path 和 geom_text 添加到同一 ggplot 会在 r 中生成错误

我正在同一个 ggplot 中绘制 geom_path 对象和 geom_text 对象，但遇到以下问题：

#load the data frames
df1 <- data.frame(x=c(32, 42, 52), y=c(15, 20, 25), grp=c(1, 2, 2), site=c("A", "B", "C"))
df1$grp = factor(df1$grp)
colnames(df1)[3] = "Group"

df2 <- data.frame(x=c(32, 42, 52), y=c(15, 20, 25))

#create basic plot with site name coloured by group 
p = ggplot(df1, aes(x=x, y=y, label=site))
p = p + geom_text(aes(colour=factor(Group)), size=4)
p = p + coord_fixed()

#I try adding a path
p = p + geom_path(data=df2, aes(x=x, y=y)) 

但得到错误 eval(expr, envir, enclos) 中的错误：未找到对象“site”

有任何想法吗？

主 ggplot 调用中的每一种美感都应该出现在每个后续的 geom_ 中。解决办法是要么移动label = site或取消映射它geom_path通过将其设置为NULL there.