Farbe ändern Medianlinie ggplot geom_boxplot()

Question

Ich möchte die Farbe der Medianlinie in geom_boxplot() ändern. Ich habe gesucht und kann keinen Weg finden, es zu tun. Ich habe hier den R-Code geschrieben, den ich benutze, aber ich brauche nur einen Hinweis, wie ich die Farbe ändern kann.

ggplot(invitro2) + 
    geom_boxplot(aes(x = reorder(CANCER_TYPE,tmedian), y = GeoMedian_IC50)) + 
    xlab("") + 
    geom_point(aes(x = reorder(CANCER_TYPE,tmedian), y = GeoMedian_IC50)) + 
    theme_bw() + 
    scale_y_log10(breaks = trans_breaks("log10", function(x) 10^x), 
       labels = trans_format("log10", math_format(10^.x))) + 
    annotation_logticks(sides="l") + 
    theme(axis.text.x=element_text(angle=45,size=10,hjust=1), 
     panel.grid.major = element_blank()) 

Answer 1

Sie können die Details der Handlung verwenden, um die Koordinaten abzuleiten, wo die Mittellinie ist, und dann fügen Sie Farbe, um es geom_segment verwenden.

library(ggplot2) 

p <- ggplot(mtcars, aes(factor(am), mpg)) + geom_boxplot() 

dat <- ggplot_build(p)$data[[1]] 

p + geom_segment(data=dat, aes(x=xmin, xend=xmax, 
           y=middle, yend=middle), colour="red", size=2) 

hatte auch die size der Leitung zu erhöhen, so dass es die ursprüngliche schwarz Median Linie