I have the following code
ggplot(gather(mtcars[,-c(8:11)]), aes(value)) + geom_boxplot(alpha = .7) + facet_wrap(~key, scales = "free")