diff --git a/index.Rmd b/index.Rmd index cd8464f..8a22f09 100644 --- a/index.Rmd +++ b/index.Rmd @@ -25,7 +25,7 @@ before_last_year <- current_year - 2 country_list <- c( "United States", "China", "Japan", "Britain", "Canada", "Euro area", "Austria", "Belgium", "France", "Germany", "Greece", - "Italy", "Netherlands", "Spain", "Czech Republic", + "Italy", "Netherlands", "Spain", "Czechia", "Denmark", "Norway", "Poland", "Russia", "Sweden", "Switzerland", "Türkiye", "Australia", "Hong Kong", "India", "Indonesia", "Malaysia", "Pakistan", "Philippines", "Singapore", "South Korea", "Taiwan", "Thailand", @@ -273,6 +273,8 @@ forecast_gdp_cpi <- rdb( ) |> mutate( Country = case_when( + Country == "Turkey" ~ "Türkiye", + Country == "Czech Republic" ~ "Czechia", Country == "United Kingdom" ~ "Britain", Country == "Hong Kong SAR" ~ "Hong Kong", Country == "Korea" ~ "South Korea", @@ -426,6 +428,8 @@ df_final <- df_all |> bind_rows(df_latest) |> mutate( Country = case_when( + Country == "Turkey" ~ "Türkiye", + Country == "Czech Republic" ~ "Czechia", Country == "United Kingdom" ~ "Britain", Country == "Euro area (20 countries)" ~ "Euro area", Country == "China (People's Republic of)" ~ "China", diff --git a/index.html b/index.html index fa1ddfe..e4bcfae 100644 --- a/index.html +++ b/index.html @@ -1095,13 +1095,14 @@ -Czech Republic +Czechia -NA +-0.2 +Q4 -NA ++0.2 +2.9 @@ -1110,16 +1111,19 @@ +2.7 -NA +-2.7 +Nov -NA ++6.9 +Dec +2.1 -NA ++2.8 +Dec @@ -2056,7 +2060,7 @@ country_list <- c( "United States", "China", "Japan", "Britain", "Canada", "Euro area", "Austria", "Belgium", "France", "Germany", "Greece", - "Italy", "Netherlands", "Spain", "Czech Republic", + "Italy", "Netherlands", "Spain", "Czechia", "Denmark", "Norway", "Poland", "Russia", "Sweden", "Switzerland", "Türkiye", "Australia", "Hong Kong", "India", "Indonesia", "Malaysia", "Pakistan", "Philippines", "Singapore", "South Korea", "Taiwan", "Thailand", @@ -2302,6 +2306,8 @@

Download

) |> mutate( Country = case_when( + Country == "Turkey" ~ "Türkiye", + Country == "Czech Republic" ~ "Czechia", Country == "United Kingdom" ~ "Britain", Country == "Hong Kong SAR" ~ "Hong Kong", Country == "Korea" ~ "South Korea", @@ -2452,6 +2458,8 @@

Merge

bind_rows(df_latest) |> mutate( Country = case_when( + Country == "Turkey" ~ "Türkiye", + Country == "Czech Republic" ~ "Czechia", Country == "United Kingdom" ~ "Britain", Country == "Euro area (20 countries)" ~ "Euro area", Country == "China (People's Republic of)" ~ "China",