Code
`TCRED-SALAIRES-REVENUS-REV-SAL-SEXE-CS` %>%
group_by(LAST_UPDATE) %>%
summarise(Nobs = n()) %>%
print_table_conditional()
LAST_UPDATE | Nobs |
---|---|
2016-06-20 | 7 |
2022-06-22 | 5684 |
Data - INSEE
`TCRED-SALAIRES-REVENUS-REV-SAL-SEXE-CS` %>%
group_by(LAST_UPDATE) %>%
summarise(Nobs = n()) %>%
print_table_conditional()
LAST_UPDATE | Nobs |
---|---|
2016-06-20 | 7 |
2022-06-22 | 5684 |
`TCRED-SALAIRES-REVENUS-REV-SAL-SEXE-CS` %>%
group_by(IDBANK, TITLE_FR) %>%
summarise(Nobs = n(),
date1 = first(TIME_PERIOD),
date2 = last(TIME_PERIOD)) %>%
arrange(-Nobs) %>%
if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {
`TCRED-SALAIRES-REVENUS-REV-SAL-SEXE-CS` %>%
group_by(TIME_PERIOD) %>%
summarise(Nobs = n()) %>%
arrange(desc(TIME_PERIOD)) %>%
print_table_conditional()
TIME_PERIOD | Nobs |
---|---|
2019 | 812 |
2018 | 812 |
2017 | 812 |
2016 | 812 |
2015 | 812 |
2014 | 812 |
2013 | 819 |