# NOT RUN {
plot(close ~ year, data = Dowjones, type = "l", main = "Exercise 1.35")
# }
# NOT RUN {
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