Code
load_data("oecd/ICT_HH2_var.RData")
ICT_HH2 <- read_parquet("ICT_HH2.parquet")Data - OECD
load_data("oecd/ICT_HH2_var.RData")
ICT_HH2 <- read_parquet("ICT_HH2.parquet")Last observation: A: 2021 (N = 68690)
First observation: A: 2005 (N = 30032)
Last data update: 02 aoû 2026, 08:59. Last compile: 18 aoû 2026, 00:26
ICT_HH2 |>
left_join(ICT_HH2_var |> pluck("INDIC"), by = c("INDIC" = "id")) |>
rename(`INDIC Description` = label) |>
group_by(INDIC, `INDIC Description`, BRKD) |>
summarise(nobs = n()) |>
arrange(-nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}ICT_HH2_var$VAR_DESC %>%
{if (is_html_output()) print_table(.) else .}| id | description |
|---|---|
| COU | Country |
| INDIC | Indicator |
| BRKD | Breakdowns |
| TIME | Time |
| OBS_VALUE | Observation Value |
| TIME_FORMAT | Time Format |
| OBS_STATUS | Observation Status |
| UNIT | Unit |
| POWERCODE | Unit multiplier |
| REFERENCEPERIOD | Reference period |
ICT_HH2 |>
left_join(ICT_HH2_var |> pluck("INDIC"), by = c("INDIC" = "id")) |>
rename(`INDIC Description` = label) |>
group_by(INDIC, `INDIC Description`) |>
summarise(nobs = n()) |>
arrange(-nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}ICT_HH2 |>
left_join(ICT_HH2_var |> pluck("BRKD"), by = c("BRKD" = "id")) |>
rename(`BRKD Description` = label) |>
group_by(BRKD, `BRKD Description`) |>
summarise(nobs = n()) |>
arrange(-nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}