4

我正在尝试创建一个折线图并在添加错误栏中时不断收到错误（刚刚开始使用 R，所以很抱歉！）。我不知道为什么 - 帮助将不胜感激！

Group = c("a","a","b","b","a","a","b","b")
Time = c(1,2,1,2,1,2,1,2)
Code = c("A","A","A","A","B","B","B","B")
Mean = (2,6,7,5,6,1,2,8)
SE = c(1.9,1.7,1.5,1.3,2,1.8,2.3,1.5)
dataset=data.frame(Group,Time,Code,Mean,SE)

ggplot(data=dataset) + geom_line(aes(x=Time,y=Mean,colour=Code,linetype=Group))+ 
  scale_x_continuous(breaks=c(1,2)) + 
  scale_linetype_manual(values=c(2,1)) + 
  geom_point(aes(x=Time,y=Mean,colour=Code,linetype=Group)) + 
  geom_errorbar(aes(ymin=Mean-SE,ymax=Mean+SE),width=.1,position=dodge)

问题与最后一行有关——没有它，代码可以正常工作。但有了它，我得到：Error in eval(expr, envir, enclos) : object 'x' not found。

那么我在这geom_errorbar条线上做错了什么？

4

1 回答 1

5

我会尝试的第一件事是只定义一次美学，并在ggplot()函数中这样做。IE。

ggplot(data=dataset,aes(x=Time,y=Mean,colour=Code,linetype=Group,ymin=Mean-SE,ymax=Mean+SE)) + 
geom_line() + 
scale_x_continuous(breaks=c(1,2)) + 
scale_linetype_manual(values=c(2,1)) + 
geom_point() + 
geom_errorbar(width=.1,position='dodge')

这是因为ggplot不能保证传递原始数据集中的所有变量，并且取决于此可能会导致奇怪的结果。

编辑：我只是注意到x永远不会被定义，geom_errorbar添加x=Time到或者应该解决问题。但是，确实不建议使用后者。aesggplot()geom_errorbar()

如果您提供示例数据（例如dput），我将能够为您提供进一步的帮助。

于 2013-01-26T00:48:47.017 回答