## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  eval = FALSE
)

## -----------------------------------------------------------------------------
# # install.packages("remotes")
# remotes::install_github("charlescoverdale/aieconindex")
# library(aieconindex)

## -----------------------------------------------------------------------------
# aei_releases()

## -----------------------------------------------------------------------------
# aei_files("2025-03-27", recursive = FALSE)

## -----------------------------------------------------------------------------
# df <- aei_index("latest", source = "claude_ai", variant = "raw")
# head(df)

## -----------------------------------------------------------------------------
# df <- aei_index("2026-06-26", source = "claude_ai")
# may <- df[df$date_start == max(df$date_start), ]

## -----------------------------------------------------------------------------
# uk <- aei_geography("2026-06-26", country = "GBR")
# subs <- aei_geography("2026-06-26", geography = "subregion")

## -----------------------------------------------------------------------------
# exposure <- aei_labor_market("job_exposure")
# penetration <- aei_labor_market("task_penetration")

## -----------------------------------------------------------------------------
# soc <- aei_download("2025-03-27", "SOC_Structure.csv")
# hierarchy <- aei_download("2025-09-15",
#                           "data/output/request_hierarchy_tree_claude_ai.json")

## -----------------------------------------------------------------------------
# attr(df, "aei_query")

## -----------------------------------------------------------------------------
# aei_cite("2026-03-24", format = "bibtex")