Skip to contents

Computes summary metrics from evidence rows generated by trace_model_to_evidence(). Returns key traceability indicators.

Usage

trace_indicator_scores(evidence)

Arguments

evidence

A data.frame of evidence rows (must contain indicator_id and metric_value columns).

Value

A tibble with columns: indicator, value, description.

Examples

library(r4subcore)
ctx <- r4sub_run_context(study_id = "TEST001", environment = "DEV")
#>  Run context created: "R4S-20260316113013-wl4dieex"
adam_meta <- data.frame(
  dataset = "ADSL", variable = c("STUDYID", "AGE", "AGEGR1"),
  label = c("Study ID", "Age", "Age Group")
)
sdtm_meta <- data.frame(
  dataset = "DM", variable = c("STUDYID", "AGE"),
  label = c("Study ID", "Age")
)
map <- data.frame(
  adam_dataset = "ADSL", adam_var = c("STUDYID", "AGE"),
  sdtm_domain = "DM",   sdtm_var = c("STUDYID", "AGE")
)
tm <- build_trace_model(adam_meta, sdtm_meta, mapping = map)
ev <- trace_model_to_evidence(tm, ctx = ctx)
#>  Evidence table created: 4 rows
trace_indicator_scores(ev)
#> # A tibble: 5 × 3
#>   indicator                     value description                               
#>   <chr>                         <dbl> <chr>                                     
#> 1 TRACE_VAR_COVERAGE_L2PLUS     0.667 Proportion of ADaM variables with trace l…
#> 2 TRACE_VAR_COVERAGE_L3PLUS     0.667 Proportion of ADaM variables with trace l…
#> 3 TRACE_ORPHAN_VAR_COUNT        1     Number of orphan ADaM variables with no S…
#> 4 TRACE_AMBIGUOUS_MAPPING_COUNT 0     Number of ADaM variables mapped to multip…
#> 5 TRACE_MEAN_TRACE_LEVEL        2.33  Mean trace level across all ADaM variables