# NOT RUN {
boxplot(reading ~ brand, data = Scales, col = rainbow(4),
ylab = "Weight (lbs)")
# }
# NOT RUN {
library(ggplot2)
ggplot2::ggplot(data = Scales, aes(x = brand, y = reading, fill = brand)) +
geom_boxplot() +
labs(y = "weight (lbs)") +
theme_bw() +
theme(legend.position = "none")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab