Commit 184845cf authored by Markus Mößler's avatar Markus Mößler
Browse files

updated download of data script

parent 3d35d711

01_data/qna_dat_00_updated.RData

−56 B (21.5 KiB)

File changed.

No diff preview for this file type.

View original file
View changed file

01_data/qna_dat_01_updated.RData

+373 B (97.7 KiB)

File changed.

No diff preview for this file type.

View original file
View changed file

02_code/230506_MM_OECD_Download_Data.R

+0 −1
Original line number Diff line number Diff line
@@ -11,7 +11,6 @@ library(plotly) 
# -> 0) load data structure for qna

dataset <- "QNA"

url <- paste0("https://stats.oecd.org/restsdmx/sdmx.ashx/GetDataStructure/", dataset)

url <- paste0("https://stats.oecd.org/restsdmx/sdmx.ashx/GetDataStructure/", dataset, "/all?format=SDMX-ML")

data_structure <- readsdmx::read_sdmx(url)

data_structure %>%

  filter(id == c("CL_QNA_SUBJECT"),

02_code/240927_MM_OECD_Download_Data.R

+1 −0
Original line number Diff line number Diff line
@@ -72,6 +72,7 @@ qna_dat <- qna_dat %>% 
    by = c("REF_AREA", "ObsDimension")

  ) %>%

  group_by(REF_AREA, TRANSACTION) %>%

  arrange(ObsDimension) %>% 

  mutate(

    lev = ObsValue,

    gro = (lev - lag(lev))/lag(lev)*100,