Hi @Eisawi99, remember put a reproducible example of data for get a better help.
Reprex
A simple example of this plot is something like that:
library(ggplot2)
HumorData <- data.frame(
Gender = c("Male", "Female", "Male", "Female", "Male", "Female"),
Funniness = c(6, 8, 6, 9, 5, 7),
College = c("A", "A", "B", "B", "A", "B"))
# Create the plot using ggplot2
ggplot(HumorData, aes(x=Gender, y=Funniness, fill=Gender)) +
geom_boxplot(notch=TRUE) +
facet_grid(~College)