0

我正在尝试用我的数据集的样本数标记我的 geom_bar 的顶部以下链接使我接近我的解决方案...使用 stat_summary 用 我在 geom_bar 中成功使用的观察次数来注释图但是当我添加填充时它不起作用。我得到的错误是“eval（expr，envir，enclos）中的错误：找不到对象'变量'”。不知道这是为什么或它意味着什么？

这是我的代码：

#df<-original data frame
#df2<-Averaged Count Data/# of samples within groups

###Create Labels
labels<-table(df$Distance,df$Site)
meds<-c(by(df2$count,df2$Site, max))
+geom_text(data=data.frame(), 
aes(x=names(meds), y=meds,label=paste("n =",labels)),vjust=-2)

###Plot

ggplot(df, aes(x=Distance, y=count, fill=variable))+geom_bar(stat="Identity")+
geom_text(data=data.frame(),
aes(x=names(meds), y=meds, label=paste("n =",labels)),vjust=-2)

在此处输入图像描述

本质上是这张图片，但填充了颜色。我希望颜色代表我在变量类别中的因素

df
     Station    Site    Distance
           1           1    0
           2           1    20
           3           1    40
           4           1    60
           1           2    0
           2           2    20
           3           2    40
           4           2    60
           5           2    80

 df1
  Station   Site    Distance    Count   variable
     1         1    0          1        a
     2         1    20         1        a
     3         1    40         1        a
     4         1    60         1        a
     1         2    0          1        a
     2         2    20         2        a
     3         2    40         2        a
     4         2    60         2        a
     5         2    80         2        a
     1         1    0          0        b
     2         1    20         0        b
     3         1    40         0        b
     4         1    60         0        b
     1         2    0          0        b
     2         2    20         1        b
     3         2    40         1        b
     4         2    60         1        b
     5         2    80         1        b

谢谢！

4

0 回答 0