Code
%>%
A129_A138 if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {
Data - INSEE
%>%
A129_A138 if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {
%>%
naf2008_5_niveaux select(1:5) %>%
if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {