# NOT RUN {
boxplot(Vacation$number, col = "violet")
hist(Vacation$number, main = "Exercise 6.46", col = "blue",
xlab = "number of days of paid holidays and vacation leave taken")
t.test(Vacation$number, mu = 24)
# }
Run the code above in your browser using DataLab