Calculate AUPRC Metric — calculate

Calculates AUPRC metric with optional visualization

calculate_auprc(
  network_table,
  ground_truth,
  return_plot = FALSE,
  line_color = "#1563cc",
  line_width = 1
)

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 plot
line_color: Color for plot lines
line_width: Width for plot lines

Value

A list containing metric and optional plot

Examples

data("example_matrix")
data("example_ground_truth")
network_table <- inferCSN(example_matrix)
#> ℹ [2025-04-22 07:40:04] Running for <dense matrix>.
#> ℹ [2025-04-22 07:40:04] Checking input parameters.
#> ℹ [2025-04-22 07:40:04] Using L0 sparse regression model.
#> ℹ [2025-04-22 07:40:04] Using 1 core
#> ✔ [2025-04-22 07:40:05] Run done.
calculate_auprc(
  network_table,
  example_ground_truth,
  return_plot = TRUE
)
#> $metrics
#>   Metric Value
#> 1  AUPRC 0.437
#> 
#> $plot

#>