The function saves a 3D plot of a network to file, therefore it requires the plot to be open. A screenshot of the 3D plot can be saved in "pdf" format. Background of the device is changed to white for plotting. The screenshot can take several seconds for large plots.
File to save to.
1 2 3 4 5 6 7 8 9 10 11 12 13
library(DLBCL) data(dataLym) data(interactome) interactome <- subNetwork(dataLym$label, interactome) fchange <- dataLym$diff names(fchange) <- dataLym$label subnet <- largestComp(subNetwork(nodes(interactome)[1:100], interactome)) diff <- fchange[nodes(subnet)] ## Not run: library(rgl); plot3dModule(network=subnet, diff.or.score=diff); save3dModule(file="test") ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.