parse_dimensions.RdParse dimensions
parse_dimensions(dimensions)
| dimensions | Object returned by openthl:::get_dimensions. |
|---|
Tuomo Nieminen
url <- "https://sampo.thl.fi/pivot/prod/en/epirapo/covid19case/fact_epirapo_covid19case.json" dimensions <- openthl:::get_dimensions(url) x <- openthl:::parse_dimensions(dimensions) names(x)#> [1] "hcdmunicipality2020" "dateweek2020010120201231" #> [3] "ttr10yage" "sex" #> [5] "measure"#> Classes ‘hydra_dimension_df’ and 'data.frame': 310 obs. of 15 variables: #> $ stage1_id : chr "hcdmunicipality20202" "hcdmunicipality20202" "hcdmunicipality20202" "hcdmunicipality20202" ... #> $ stage1_sid : int 445131 445131 445131 445131 445131 445131 445131 445131 445131 445131 ... #> $ stage1_label : chr "Åland" "Åland" "Åland" "Åland" ... #> $ stage1_stage : chr "hcd" "hcd" "hcd" "hcd" ... #> $ stage1_code : chr "hcdmunicipality20202" "hcdmunicipality20202" "hcdmunicipality20202" "hcdmunicipality20202" ... #> $ stage1_sort : int 2 2 2 2 2 2 2 2 2 2 ... #> $ stage1_uri : chr "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/hcd/2" "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/hcd/2" "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/hcd/2" "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/hcd/2" ... #> $ stage1_parent_id: chr "hcdmunicipality20201" "hcdmunicipality20201" "hcdmunicipality20201" "hcdmunicipality20201" ... #> $ stage2_id : chr "hcdmunicipality202023" "hcdmunicipality202024" "hcdmunicipality202025" "hcdmunicipality202026" ... #> $ stage2_sid : int 445268 444988 445090 445231 445227 445124 445080 445266 445153 445091 ... #> $ stage2_label : chr "Brändö" "Eckerö" "Finström" "Föglö" ... #> $ stage2_stage : chr "municipality" "municipality" "municipality" "municipality" ... #> $ stage2_code : chr "hcdmunicipality202023" "hcdmunicipality202024" "hcdmunicipality202025" "hcdmunicipality202026" ... #> $ stage2_sort : int 23 24 25 26 27 28 29 30 31 32 ... #> $ stage2_uri : chr "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/municipality/23" "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/municipality/24" "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/municipality/25" "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/municipality/26" ... #> - attr(*, "root")='data.frame': 1 obs. of 8 variables: #> ..$ id : chr "hcdmunicipality20201" #> ..$ sid : int 445222 #> ..$ label : chr "All areas" #> ..$ stage : chr "root" #> ..$ code : chr "hcdmunicipality20201" #> ..$ sort : int 1 #> ..$ uri : chr "http://meta.thl.fi/codes/wild/dimension/hcdmunicipality2020/1/root/1" #> ..$ parent_id: chr "hcdmunicipality2020" #> - attr(*, "nstage")= num 2