Check dictionaries

[jonthegeek]

143 datasets are missing dictionaries. Confirm that they're really missing, not just that something is named wrong or that sort of thing. I found and fixed several, but didn't want to spend too much time on it until I set something up to check systematically.

[jonthegeek]

tt_summary_tbl |> 
  dplyr::select(year, week, date) |> 
  dplyr::left_join(tt_datasets_metadata, by = c("year", "week")) |> 
  dplyr::select(year, week, date, dataset_name, variable_details) |> 
  tidyr::unnest(variable_details) |> 
  dplyr::summarize(
    missing_dictionary = all(is.na(description)),
    .by = c("year", "week", "date", "dataset_name")
  ) |> 
  dplyr::filter(missing_dictionary) |> 
  dplyr::arrange(desc(date)) |> 
  dplyr::select(-"missing_dictionary") |> 
  dplyr::mutate(
    link = glue::glue("https://tidytues.day/{year}/{date}")
  )