Data - INSEE
François Geerolf
load_data("insee/arrond2016.RData")
arrond2016 %>% select(1, 2, 3, 4, 9) %>% {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}