rdp <- RedPort('MyPort')
nodes<-c("n1","n2","n1","n3","n1","n4","n1","n5","n1","n6","n1","n7")
## Not run:
#
# calld(rdp)
# addNodes(rdp, nodes)
# mergeNodes(rdp,c("n2","n3","n4"))
# updateGraph(rdp)
# ## End(Not run)
Run the code above in your browser using DataLab