library(igraph)
library(BioNet)
library(PHONEMeS)
load("data4cluster_6.RData")
opres<-oRes(data.On=data.P, optParam=optParam, pknList=pknList)
plotoRes(opres=opres,optParam=optParam, data.On=data.P)
save.image(paste("p",resN(optParam),"_imported.RData", sep=""))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.