Calculates F1 score
Examples
data("example_matrix")
data("example_ground_truth")
network_table <- inferCSN(example_matrix)
#> ℹ [2025-06-17 13:47:03] Running for <dense matrix>.
#> ℹ [2025-06-17 13:47:03] Checking input parameters.
#> ℹ [2025-06-17 13:47:03] Using L0 sparse regression model.
#> ℹ [2025-06-17 13:47:03] Using 1 core
#> ℹ [2025-06-17 13:47:03] Elapsed 0.14 sec
#> ✔ [2025-06-17 13:47:03] Run done.
calculate_f1(
network_table,
example_ground_truth
)
#> $metrics
#> Metric Value
#> 1 F1 0.692
#>