ggplot(economics, aes(x = date, y = unemploy)) +
geom_line()