Calculate AUC Metrics — calculate

Calculates AUROC and AUPRC metrics with optional visualization

Usage

calculate_auc(
  network_table,
  ground_truth,
  return_plot = FALSE,
  line_color = "#1563cc",
  line_width = 1,
  tag_levels = "A"
)

Arguments

network_table: A data frame of predicted network structure
ground_truth: A data frame of ground truth network
return_plot: Logical value indicating whether to generate plots
line_color: Color for plot lines
line_width: Width for plot lines
tag_levels: Tag levels for plot annotations

Value

A list containing metrics and optional plots

Examples

data(example_matrix)
data("example_ground_truth")
network_table <- inferCSN(example_matrix)
#> ℹ [2025-12-17 14:37:02] Inferring network for <dense matrix>...
#> ◌ [2025-12-17 14:37:02] Checking parameters...
#> ℹ [2025-12-17 14:37:02] Using "L0" sparse regression model
#> ℹ [2025-12-17 14:37:02] Using 1 core
#> ⠙ [2025-12-17 14:37:02] Running [1/18] Processing: g1  ETA:  0s
#> ✔ [2025-12-17 14:37:02] Completed 18 tasks in 174ms
#> 
#> ℹ [2025-12-17 14:37:02] Building results
#> ✔ [2025-12-17 14:37:02] Building network done
calculate_auc(
  network_table,
  example_ground_truth,
  return_plot = TRUE
)
#> $metrics
#>   Metric Value
#> 1  AUROC 0.952
#> 2  AUPRC 0.437
#> 
#> $plot

#>