ggplot(by_year_continent, aes(x = year, y = totalPop, color = continent)) +
    geom_point() +
    expand_limits(y = 0)