plot(close ~ year, data = Dowjones, type = "l", main = "Exercise 1.35")
if (FALSE) {
library(ggplot2)
ggplot2::ggplot(data = Dowjones, aes(x = year, y = close)) +
           geom_point(size = 0.5) + 
           geom_line(color = "red") + 
           theme_bw() + 
           labs(y = "Dow Jones Closing Price")
}
Run the code above in your browser using DataLab