## ---- echo = FALSE--------------------------------------------------------- knitr::opts_chunk$set( eval=FALSE ) ## -------------------------------------------------------------------------- # if(!"RCy3" %in% installed.packages()){ # install.packages("BiocManager") # BiocManager::install("RCy3") # } # library(RCy3) ## -------------------------------------------------------------------------- # openSession() ## -------------------------------------------------------------------------- # setVisualStyle('default') # setNodeColorDefault('#D8D8D8') ## -------------------------------------------------------------------------- # setNodeCustomBarChart(c("gal1RGexp","gal4RGexp","gal80Rexp")) ## -------------------------------------------------------------------------- # setNodeCustomPosition(nodeAnchor = "S", graphicAnchor = "N") ## -------------------------------------------------------------------------- # setNodeCustomHeatMapChart(c("gal1RGexp","gal4RGexp","gal80Rexp"), slot = 2) # setNodeCustomPosition(nodeAnchor = "N", graphicAnchor = "S", slot = 2) ## -------------------------------------------------------------------------- # setNodeCustomPieChart(c("Radiality", "Degree"), slot = 3) # setNodeCustomPosition(nodeAnchor = "W", xOffset = -20, slot = 3) ## -------------------------------------------------------------------------- # installApp("enhancedGraphics") ## -------------------------------------------------------------------------- # all.nodes<-getAllNodes() # label.df<-data.frame(all.nodes, "label: attribute=COMMON labelsize=10 color=red outline=false background=false") # colnames(label.df)<-c("name","my second label") ## -------------------------------------------------------------------------- # loadTableData(label.df, data.key.column = "name", table.key.column = "name") ## -------------------------------------------------------------------------- # label.map<-mapVisualProperty('node customgraphics 4','my second label','p') # updateStyleMapping('default', label.map) ## -------------------------------------------------------------------------- # setNodeCustomPosition(nodeAnchor = "E", graphicAnchor = "C", xOffset = 10, slot = 4)