10

以下のコードを使用して、一連の平均値と標準偏差を経時的にプロットしており、geom_ribbon を使用して sd を表示しようとしています。以下を参照してください。

重複が大きい​​ため、対応する変数と同じ色で破線の境界線をリボンに追加したいのですが、コードのどこに行くのかわかりません。「色」と「線種」コマンドが何らかの形で関係していることは知っています...

ありがとう！

graph.msd <- ggplot(data=g.data, aes(x=quarter,y=mean,group=number)) 
graph.msd <- graph.msd + geom_line(aes(colour = number),size=1)+geom_ribbon(aes(ymin=mean-sd,ymax=mean+sd,fill=number),linetype=2,alpha=0.1)
4

1 に答える 1

16

次のようなものに値colourを渡す必要があります geom_ribbon

graph.msd <- graph.msd + 
 geom_line(aes(colour = number),size=1)+
 geom_ribbon(aes(ymin = mean-sd, ymax = mean+sd, 
                 fill = number,colour = number), linetype=2, alpha=0.1)

再現可能な例 (の例の変形を使用)?geom_ribbon

huron <- data.frame(year = 1875:1972, level = as.vector(LakeHuron))
library(plyr) # to access round_any
huron$decade <- round_any(huron$year, 10, floor)

ggplot(huron, aes(x =year, group = decade)) + 
  geom_ribbon(aes(ymin = level-1, ymax = level+1, 
      colour = factor(decade), fill = factor(decade)), 
    linetype = 2, alpha= 0.1)

ここに画像の説明を入力

于 2013-03-20T01:10:08.283 に答える