rdp <- RedPort('MyPort')
## Not run:
#
# calld(rdp)
#
# g <- graph.lattice(c(5,5,5))
#
# #..extract subgraphs from g and send to RedeR:
# nl<-list(c(1:10),c(15:20))
# att<-data.frame(isNest=c(TRUE,TRUE), nestColor=c("#0000ff","#ff0000"))
# addSubgraph.list( rdp, g, nodeList=nl, gridRows=1, gatt=att, gridScale=80)
#
# #..for further attributes see 'addGraph' function!
# ## End(Not run)
Run the code above in your browser using DataLab