Want to solve programming problems and get paid for it? If that sounds interesting to you then contact us.
# Just to ensure levels are in correct order
dataset$emp_month <- factor(
levels = c("January", "March", "April", "May", "December")
geom_boxplot(aes(x = emp_month, y = salary)) +
geom_point(aes(x = emp_month, y = salary)) +
facet_grid(. ~ emp_month ,space = "free", scales = "free", margins = T)