Code
MM23 %>%
group_by(freq, Frequency) %>%
summarise(Nobs = n()) %>%
print_table_conditional| freq | Frequency | Nobs |
|---|---|---|
| A | Annual | 229877 |
| M | Monthly | 721023 |
| Q | Quarterly | 315660 |
Data - ons
MM23 %>%
group_by(freq, Frequency) %>%
summarise(Nobs = n()) %>%
print_table_conditional| freq | Frequency | Nobs |
|---|---|---|
| A | Annual | 229877 |
| M | Monthly | 721023 |
| Q | Quarterly | 315660 |
MM23 %>%
group_by(title, Title) %>%
summarise(Nobs = n()) %>%
print_table_conditionalMM23 %>%
filter(title %in% c("CZXD", "L5P8"),
!is.na(value),
freq == "M") %>%
ggplot + geom_line(aes(x = period, y = value))
MM23 %>%
filter(title %in% c("DOBP"),
!is.na(value),
freq == "M") %>%
ggplot + geom_line(aes(x = period, y = value, color = title))
MM23 %>%
filter(title %in% c("CRQO", "D7BT"),
!is.na(value),
freq == "M") %>%
ggplot + geom_line(aes(x = period, y = value, color = Title))