```r
nasa_desc <- tibble(id = metadata$dataset$`_id`$`$oid`, 
                        desc = metadata$dataset$description)

nasa_desc %>% 
  select(desc) %>% 
  sample_n(5)
```

```
## # A tibble: 5 x 1
##   desc                                                                                              
##   <chr>                                                                                             
## 1 Molybdenum has been identified as a promising material for many high temperature NASA application…
## 2 ABSTRACT: NPP GRASSLAND: RIO MAYO, ARGENTINA, 1983-1989                                           
## 3 Multi-Channel SST retreivals generated in real-time from NOAA-19 AVHRR Local Area Coverage data. …
## 4 "MODIS (or Moderate Resolution Imaging Spectroradiometer) is a key instrument aboard the\nTerra (…
## 5 "The Coastal Zone Color Scanner Experiment (CZCS) was the first instrument devoted to the measure…
```