Myujth

I have this code:

 ggplot(baseline, aes(x=Group, y=Thickness, color=Group, !is.na(Thickness))) + 
 geom_boxplot(outlier.colour="black", outlier.shape=16, outlier.size=0.5, notch=FALSE) +
 geom_dotplot(binaxis='y', stackdir='center', dotsize=0.5) +
 scale_x_discrete(limits=c("HC", "Patients")) +
 scale_y_continuous(breaks = seq(0.15, 0.30, by = 0.05 ))

By default, I get HC in red and Patients in blue. But I would like to get the box plot: HC in black and Patients in red.

A reproducible example:

PatientID. Group. Thickness
1OD HC 0.5
1OS HC 0.5
23OD Patient 0.001
23OS Patient 0.01
44OD Patient 0.03
44OS Patient 0.04
3OD HC 0.7
3OS HC 0.9

I can't find the code. Could you help me?

Thanks
Lili

You can use scale_color_manual to specify desired color.
P.S: if you want a fancier hybrid boxplot, take a look at this

library(tidyverse)

df <- read_table("PatientID. Group. Thickness
1OD HC 0.5
1OS HC 0.5
23OD Patient 0.001
23OS Patient 0.01
44OD Patient 0.03
44OS Patient 0.04
3OD HC 0.7
3OS HC 0.9")

ggplot(df, aes(x = Group., y = Thickness, color = Group.)) +
 geom_boxplot(outlier.colour = "black", 
 outlier.size = 0.5, notch = FALSE) +
 geom_dotplot(binaxis = "y", stackdir = "center", dotsize = 0.5, 
 show.legend = FALSE) +
 scale_color_manual(values = c("HC" = "black", "Patient" = "red"))
#> `stat_bindot()` using `bins = 30`. Pick better value with `binwidth`.

^{Created on 2018-11-15 by the reprex package (v0.2.1.9000)}