Weight sift

Remove edges with smaller weights in the reverse direction.

Usage

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-06-17 13:47:31] Running for <dense matrix>.
#> ℹ [2025-06-17 13:47:31] Checking input parameters.
#> ℹ [2025-06-17 13:47:31] Using L0 sparse regression model.
#> ℹ [2025-06-17 13:47:31] Using 1 core
#> ℹ [2025-06-17 13:47:31] Elapsed 0.13 sec
#> ✔ [2025-06-17 13:47:31] 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