---
title: "class-exercise"
format: html
---

# load gapminder data

```{r}
library(gapminder)
a <- gapminder$country 
a <- unique(a)

# or 
a <- gapminder$country |> unique()
"Vietnam" %in% a
```





# get unique names