Calculate AUPRC and AUROC values
calculate_auc(
network_table,
ground_truth,
plot = FALSE,
line_color = "#1563cc",
line_width = 1
)
AUC values and figure
data("example_matrix")
data("example_ground_truth")
network_table <- inferCSN(example_matrix)
#> ✔ Running for <dense matrix>.
#> ✔ Checking input parameters.
#> ✔ Using L0 sparse regression model.
#> ✔ Using 1 core.
#> ✔ Run done.
calculate_auc(network_table, example_ground_truth, plot = TRUE)
#> AUROC AUPRC
#> 1 0.963 0.495