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()関数で行うことです。すなわち。

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 に答える