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 |