3

同じ 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))

しかし、エラー Error in eval(expr, envir, enclos) : object 'site' not found が発生します

何か案は？

4

2 に答える 2

7

メインの ggplot 呼び出しのすべての美学は、後続のすべての geom_ で期待されます。解決策は、そこに設定して移動するlabel = siteか、マップを解除することです。geom_pathNULL

于 2012-09-27T20:52:08.490 に答える
3 
ggplot(df1, aes(x, y)) + 
geom_text(aes(label = site, colour = factor(Group)), size = 4) +
coord_fixed() + geom_path(df2, aes(x, y))
于 2012-09-27T20:52:26.080 に答える