```r
gapminder %>%
  select(gdpPercap, lifeExp) %>%
  summarise(
    minGdp = min(gdpPercap),
    maxGdp = max(gdpPercap),
    minLifeExp = min(lifeExp),
    maxLifeExp = max(lifeExp),
  )
```

```
## # A tibble: 1 × 4
##   minGdp  maxGdp minLifeExp maxLifeExp
##    <dbl>   <dbl>      <dbl>      <dbl>
## 1   241. 113523.       23.6       82.6
```