Rectangling data: applications

chars |> 
  unnest_wider(json) |> 
  select(id, titles) |> 
  unnest_longer(titles)

## # A tibble: 59 × 2
##       id titles                                                
##    <int> <chr>                                                 
##  1  1022 "Prince of Winterfell"                                
##  2  1022 "Lord of the Iron Islands (by law of the green lands)"
##  3  1052 "Acting Hand of the King (former)"                    
##  4  1052 "Master of Coin (former)"                             
##  5  1074 "Lord Captain of the Iron Fleet"                      
##  6  1074 "Master of the Iron Victory"                          
##  7  1109 ""                                                    
##  8  1166 "Captain of the Guard at Sunspear"                    
##  9  1267 ""                                                    
## 10  1295 "Maester"                                             
## # ℹ 49 more rows