我正在尝试创建一条折线图,在添加误差线时一直出现错误(因为我刚开始接触 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
行上做错了什么?