Using built-in datasets

data(mtcars)
hist(mtcars$mpg, main = "MPG distribution", xlab = "mpg")
boxplot(mpg ~ cyl, data = mtcars, xlab = "cylinders", ylab = "mpg")
plot(mtcars$wt, mtcars$mpg, xlab = "weight (1000 lb)", ylab = "mpg", pch = 19)

Try it

• Use iris to make a histogram of Sepal.Length.
• Create a scatter plot of wt vs mpg with a title and axis labels.