Union two networks
c_net_union(go1, go2, ...)metanet
Other manipulate:
anno_edge(),
anno_vertex(),
c_net_annotate(),
c_net_filter(),
c_net_load(),
c_net_save(),
get_e(),
get_n(),
get_v(),
is_metanet()
g1 <- make_graph(edges = c("1", 2, 2, 3, 3, 4, 4, 5, 5, 1), directed = FALSE) %>% as.metanet()
g2 <- make_graph(edges = c("4", 5, 5, 6, 6, 7, 7, 8, 8, 4), directed = FALSE) %>% as.metanet()
par(mfrow = c(1, 3))
plot(c_net_union(g1, g2))
#> Duplicated vertexes: 2
#> Use the attributes of the first network.
#> Duplicated edges: 2
#> Use the attributes of the first network.
plot(c_net_intersect(g1, g2))
#> Duplicated vertexes: 2
#> Use the attributes of the first network.
#> Duplicated edges: 2
#> Use the attributes of the first network.
plot(c_net_difference(g1, g2))
#> Duplicated vertexes: 2
#> Use the attributes of the first network.
#> Duplicated edges: 2
#> Use the attributes of the first network.