library("qatarcars")
qatar_maroon[1] "#8A1538"hist(qatarcars$length, breaks = 15, col = qatar_maroon, border = "white")
if (require("ggplot2")) {
ggplot(qatarcars, aes(x = length)) +
geom_histogram(bins = 15, fill = qatar_maroon, color = "white")
}