Code
`CNA-2014-TEI` %>%
group_by(LAST_UPDATE) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
print_table_conditional()
LAST_UPDATE | Nobs |
---|---|
2023-05-31 | 86537 |
2022-06-03 | 15776 |
Data - INSEE
`CNA-2014-TEI` %>%
group_by(LAST_UPDATE) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
print_table_conditional()
LAST_UPDATE | Nobs |
---|---|
2023-05-31 | 86537 |
2022-06-03 | 15776 |
LAST_DOWNLOAD |
---|
2025-10-11 |
LAST_COMPILE |
---|
2025-10-11 |
`CNA-2014-TEI` %>%
group_by(TIME_PERIOD) %>%
summarise(Nobs = n()) %>%
arrange(desc(TIME_PERIOD)) %>%
head(1) %>%
print_table_conditional()
TIME_PERIOD | Nobs |
---|---|
2022 | 129 |
`CNA-2014-TEI` %>%
left_join(CNA_ACTIVITE, by = "CNA_ACTIVITE") %>%
group_by(CNA_ACTIVITE, Cna_activite) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
print_table_conditional()
`CNA-2014-TEI` %>%
left_join(CNA_PRODUIT, by = "CNA_PRODUIT") %>%
group_by(CNA_PRODUIT, Cna_produit) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {
`CNA-2014-TEI` %>%
group_by(IDBANK, TITLE_FR) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
print_table_conditional()
`CNA-2014-TEI` %>%
group_by(TIME_PERIOD) %>%
summarise(Nobs = n()) %>%
arrange(desc(TIME_PERIOD)) %>%
print_table_conditional()