Remove edges with smaller weights in the reverse direction.

weight_sift(table)

Arguments

table

A data frame with three columns: "regulator", "target", and "weight".

Examples

data("example_matrix")
network_table <- inferCSN(example_matrix)
#>  [2025-07-28 09:33:47] Running for <dense matrix>.
#>  [2025-07-28 09:33:47] Checking input parameters.
#>  [2025-07-28 09:33:47] Using L0 sparse regression model.
#>  [2025-07-28 09:33:47] Using 1 core
#> ⠙ [2025-07-28 09:33:47] Running [1/18] ETA:  0s
#>  [2025-07-28 09:33:47] Completed 18 tasks in 190ms
#> 
#>  [2025-07-28 09:33:48] Building results
#>  [2025-07-28 09:33:48] Run done.
weight_sift(network_table) |> head()
#>   regulator target     weight
#> 1       g18     g1 -0.9223177
#> 2       g17    g18  0.8770468
#> 3        g4     g3  0.8103065
#> 4       g16    g15  0.7659245
#> 5       g17    g16  0.7558764
#> 6       g12    g11  0.7444053