Skip to contents

Generates visualizations comparing edges of two networks.

Usage

plot_edges_comparison(
  network_table,
  ground_truth,
  color_pattern = list(predicted = "gray", ground_truth = "#bb141a", overlap = "#1966ad",
    total = "#6C757D")
)

Arguments

network_table

A data frame of predicted network structure.

ground_truth

A data frame of ground truth network.

color_pattern

A list of colors for different categories.

Value

A patchwork plot object containing network edge comparison and distribution plots

Examples

data(example_matrix)
data("example_ground_truth")
network_table <- inferCSN(example_matrix)
#>  [2026-01-23 02:16:04] Inferring network for <matrix/array>...
#>  [2026-01-23 02:16:04] Checking parameters...
#>  [2026-01-23 02:16:04] Using L0 sparse regression model
#>  [2026-01-23 02:16:04] Using 1 core
#>  [2026-01-23 02:16:04] Building results
#>  [2026-01-23 02:16:04] Inferring network done
#>  [2026-01-23 02:16:04] Network information:
#>                          Edges Regulators Targets
#>                        1   306         18      18
plot_edges_comparison(
  network_table,
  example_ground_truth
)