Remove edges with smaller weights in the reverse direction.
Examples
data(example_matrix)
network_table <- inferCSN(example_matrix)
#> ℹ [2025-10-16 02:37:08] Running for <dense matrix>.
#> ◌ [2025-10-16 02:37:08] Checking input parameters...
#> ℹ [2025-10-16 02:37:08] Using `L0` sparse regression model
#> ℹ [2025-10-16 02:37:08] Using 1 core
#> ℹ [2025-10-16 02:37:08] Building results
#> ✔ [2025-10-16 02:37:08] Run done.
weight_sift(network_table) |> head()
#> regulator target weight
#> 1 g18 g1 -0.9223177
#> 2 g17 g18 0.8770468
#> 3 g4 g3 0.8103230
#> 4 g16 g15 0.7659245
#> 5 g17 g16 0.7558764
#> 6 g12 g11 0.7444053