gapminder data viz

Gapminder analysis

We watched Hans Rosling presenting economic data…

library(gapminder)
library(ggplot2)
library(dplyr)

Attaching package: 'dplyr'
The following objects are masked from 'package:stats':

    filter, lag
The following objects are masked from 'package:base':

    intersect, setdiff, setequal, union
gap2002 = gapminder |>
  filter(year == 2002)
  

gap2002 |>
  ggplot() +
  aes(y = lifeExp) +
  aes(x = gdpPercap) +
  geom_point() + 
  aes(color = continent) +
  aes(size = pop)