Zmień kolor linii med. Ggplot geom_boxplot()

Question

Chciałbym zmienić kolor linii środkowej w geom_boxplot(). Szukałem i nie mogę znaleźć sposobu, aby to zrobić. Wysłałem tutaj kod R, którego używam, ale naprawdę potrzebuję odniesienia do tego, jak zmienić kolor.

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

Można użyć szczegóły fabuły, aby czerpać współrzędne gdzie linia środkowa jest, a następnie dodać kolor do niego za pomocą geom_segment.

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) 

miał także na celu zwiększenie size linii tak, że obejmuje oryginalną czarną linię mediany