powered by
MergeNodes(G, nodeset, NS = NULL, setLayout = TRUE)
G
nodeset
NS
setLayout=TRUE
merge2nodes
library(gRapfa) data(Wheeze) G <- st(Wheeze) G.c <- contract.last.level(G) G.m <- MergeNodes(G.c, c(5,3))
Run the code above in your browser using DataLab