nesthc(obj, hc, ...)
RedPort
nestNodes
gtoy.rm
#g <- gtoy.rm()
#hc<-hclust(dist(get.adjacency(g)))
#plot(hc)
#rdp <- RedPort('MyPort')
## Not run:
#
# calld(rdp)
# addGraph(rdp,g)
# nesthc(rdp, hc)
#
# ## End(Not run)
Run the code above in your browser using DataLab