Цвет по шкале ошибок для geom

У меня возникли проблемы с установкой ошибок в цветах вручную, чтобы следить за цветовой схемой, которую я установил для своих очков. По сути, я хотел бы, чтобы цвет каждой панели ошибок соответствовал цвету заливки связанной точки.Цвет по шкале ошибок для geom

Создать dataframe

mean<-c(4,5,6,7) 
CI<-c(0.5,0.4,0.3,0.2) 
stress<-c(1,2,3,4) 
a<-c(10,10,20,20) 
b<-c(7.5,7.5,8,8) 
data<-data.frame(mean,CI,stress,a,b)

Оригинальный сюжет

library(ggplot2) 
p<- ggplot(data, aes(a, mean)) 
p+geom_point()+ 
    geom_errorbar(aes(ymax=mean+CI,ymin=mean-CI), width=0.3, color=factor(stress))+ 
    geom_point(aes(fill=factor(stress)),size=8, shape=21)+ 
    scale_fill_manual("Stress",breaks=c(1,2,3,4),values=c("#0072B2", "#009E73", "#E69F00", "#D55E00"))+ 
    scale_x_continuous("Level A",breaks=c(10,20))+ 
    ylab(expression("Level B"))+ 
    theme_bw(17)

Попытка создать вручную цветные полосы ошибок, но не работает

p<- ggplot(data, aes(a, mean)) 
    p+geom_point()+ 
     geom_errorbar(aes(ymax=mean+CI,ymin=mean-CI), width=0.3, color=factor(stress))+ 
scale_color_manual("Stress", breaks=c(1,2,3,4),values=c("#0072B2", "#009E73", "#E69F00", "#D55E00"))+ 
     geom_point(aes(fill=factor(stress)),size=8, shape=21)+ 
     scale_fill_manual("Stress",breaks=c(1,2,3,4),values=c("#0072B2", "#009E73", "#E69F00", "#D55E00"))+ 
     scale_x_continuous("Level A",breaks=c(10,20))+ 
     ylab(expression("Level B"))+ 
     theme_bw(17) 

p<- ggplot(data, aes(a, mean)) 
     p+geom_point()+ 
      geom_errorbar(aes(ymax=mean+CI,ymin=mean-CI), width=0.3, color=factor(stress))+ 
    scale_fill_manual("Stress", breaks=c(1,2,3,4),values=c("#0072B2", "#009E73", "#E69F00", "#D55E00"))+ 
      geom_point(aes(fill=factor(stress)),size=8, shape=21)+ 
      scale_fill_manual("Stress",breaks=c(1,2,3,4),values=c("#0072B2", "#009E73", "#E69F00", "#D55E00"))+ 
      scale_x_continuous("Level A",breaks=c(10,20))+ 
      ylab(expression("Level B"))+ 
      theme_bw(17)

источник

2015-12-04 imapiratesavvy

Я изменил 'geom_errorbar' в первую попытке вручную установить цвета' geom_errorbar (АЕС (уты = средний + CI, Ymin = средний-CI, цвет = коэффициент (стресс)) , width = 0,3). Ручки окрашены так же, как и заливка. Это то, что вам нужно? –

Я пытаюсь заставить ручки быть такими же цветами, как заполнение, да. Тем не менее, я все еще не получаю правильные цвета на ручках. Они окрашены, но они не соответствуют заполнению очков. – imapiratesavvy

работает для меня.

ggplot(data, aes(a, mean)) + 
    geom_point()+ 
    geom_errorbar(aes(ymax=mean+CI,ymin=mean-CI, color=factor(stress)), width=0.3)+ 
    scale_color_manual("Stress", breaks=c(1,2,3,4),values=c("#0072B2", "#009E73", "#E69F00", "#D55E00"))+ 
    geom_point(aes(fill=factor(stress)),size=8, shape=21)+ 
    scale_fill_manual("Stress",breaks=c(1,2,3,4),values=c("#0072B2", "#009E73", "#E69F00", "#D55E00"))+ 
    scale_x_continuous("Level A",breaks=c(10,20))+ 
    ylab(expression("Level B"))+ 
    theme_bw(17)

источник

2015-12-06 11:33:39

'geom_point()' избыточно –

ответ

Смежные вопросы