Return Aggregate Provenance

Returns the provenance recorded by an aggregate or sensitivity table.

Usage

onet_provenance(x)

Arguments

x

An object returned by onet_measure_aggregate() or onet_measure_sensitivity().

Value

A tibble with provenance fields.

Examples

measure <- onet_measure(
  tibble::tibble(onet_soc_code = c("15-1252.00", "29-1141.00"), score = c(0.7, 0.2)),
  key = "onet_soc_code",
  score = "score",
  measure_id = "stylized_score"
)
weights <- tibble::tibble(
  reference_soc_code = c("15-1252", "29-1141"),
  year = 2024L,
  employment = c(100, 300),
  weight_share = c(0.25, 0.75),
  source = "fixture",
  source_taxonomy = "2018 SOC",
  reference_taxonomy = "2018 SOC"
)
aggregate <- onet_measure_aggregate(measure, weights)
onet_provenance(aggregate)
#> # A tibble: 1 × 7
#>   measure_id     weight_source weight_year source_taxonomy reference_taxonomy
#>   <chr>          <chr>               <int> <chr>           <chr>             
#> 1 stylized_score fixture              2024 2018 SOC        2018 SOC          
#> # ℹ 2 more variables: bridge_used <lgl>, crosswalk_path <chr>