Code
`CNA-2010-CPEB` %>%
group_by(IDBANK, TITLE_FR) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}Data - INSEE
`CNA-2010-CPEB` %>%
group_by(IDBANK, TITLE_FR) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}`CNA-2010-CPEB` %>%
left_join(INDICATEUR, by = "INDICATEUR") %>%
group_by(INDICATEUR, Indicateur) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) print_table(.) else .}| INDICATEUR | Indicateur | Nobs |
|---|---|---|
| CNA_CPEB | Comptes de production et d'exploitation par branche | 93199 |
`CNA-2010-CPEB` %>%
left_join(OPERATION, by = "OPERATION") %>%
group_by(OPERATION, Operation) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}`CNA-2010-CPEB` %>%
left_join(NATURE, by = "NATURE") %>%
group_by(NATURE, Nature) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) print_table(.) else .}| NATURE | Nature | Nobs |
|---|---|---|
| VALEUR_ABSOLUE | Valeur absolue | 75820 |
| INDICE | Indice | 17379 |
`CNA-2010-CPEB` %>%
group_by(UNIT_MEASURE) %>%
summarise(Nobs = n()) %>%
{if (is_html_output()) print_table(.) else .}| UNIT_MEASURE | Nobs |
|---|---|
| EUR2010 | 17481 |
| EUROS_COURANTS | 58339 |
| SO | 17379 |