Metrics Table

On this page you can download a bulk .csv file for all the secondary data metrics collected so far in the project, which is around 650 variables. The file is ~ 40MB. Use the Download Bulk CSV button below to download it. Note that the metadata table from the last page can be used to identify and define the the variable names. To download a key to match FIPS codes to state and county names, use the Download FIPS Key button.

Soon to come on this page is an interactive table of metrics. The file size is large enough that manipulating it in the Quarto page is unwieldy, so it will have to link to a separate database. Coming soon.

pacman::p_load(
  dplyr,
  reactable,
  stringr,
  htmltools,
  readr
)

metrics_file_name = paste0(Sys.Date(), "_bulk_metrics.csv")
fips_file_name = paste0(Sys.Date(), "_fips_key.csv")

tagList(
  tags$div(
    style = "display: flex; gap: 100px; margin-bottom: 20px; justify-content: center;",
    tags$a(
      class = "btn btn-primary",
      style = "display: flex; width: 200px; justify-content: center; align-items: center;",
      href = '../data/bulk_metrics.csv',
      download = metrics_file_name,
      tagList(fontawesome::fa("download"), "Download Bulk .CSV")
    ),
   tags$a(
      class = "btn btn-primary",
      style = "display: flex; width: 200px; justify-content: center; align-items: center;",
      href = '../data/all_fips_key.csv',
      download = fips_file_name,
      tagList(fontawesome::fa("download"), "Download FIPS Key")
    )
  )
)

Download Bulk .CSV Download FIPS Key