Abstract
RGraphSpace is an R package that integrates igraph and ggplot2 graphics within spatial maps. RGraphSpace implements new geometric objects using ggplot2 prototypes, customized for representing large igraph objects in a normalized coordinate system.
Package: RGraphSpace 1.0.6
RGraphSpace is an R package that generates ggplot2 graphics for igraph objects (Csardi and Nepusz 2006), which are scaled to fit within a standard unit space, making it easier to display different graphs side by side. RGraphSpace implements new geometric objects using ggplot2 prototypes (Wickham 2016), taking into account relative sizes and positions of the input graph. By scaling graph elements, RGraphSpace can provide a framework for layered visualizations, ensuring proper alignment within a spatial map. RGraphSpace’s use of ggplot2 allows for extensive customization of aesthetics and visual style, such as colors, shapes, and line types.
This section will create a toy igraph object to demonstrate
the RGraphSpace workflow. The graph layout is configured
manually to ensure that users can easily view all the relevant arguments
needed to prepare the input data for the RGraphSpace package.
We will use the igraph’s make_star()
function to create a
simple star-like graph and then the V()
and
E()
functions are used to set attributes for vertices and
edges, respectively. The RGraphSpace package will require that
all vertices have x
, y
, and name
attributes.
#--- Load required packages
library(igraph)
library(ggplot2)
library(RGraphSpace)
# Make a 'toy' igraph with 5 nodes and 4 edges
# Note: this will be a directed graph
gtoy1 <- make_star(5, mode="out")
# Check whether the graph is directed or not
is_directed(gtoy1)
## [1] TRUE
# Check graph size
vcount(gtoy1)
## [1] 5
ecount(gtoy1)
## [1] 4
# Assign 'x' and 'y' coordinates to each vertex;
# ..this can be an arbitrary unit in (-Inf, +Inf)
V(gtoy1)$x <- c(0, 3, -6, -6, -9)
V(gtoy1)$y <- c(0, 0, 6, -6, 0)
# Assign a name to each vertex
V(gtoy1)$name <- paste0("n", 1:5)
# Plot the 'gtoy1' using standard R graphics
plot(gtoy1)
# Plot the 'gtoy1' using RGraphSpace
plotGraphSpace(gtoy1, marks = TRUE)
Next, we will demonstrate all vertex and edge attributes that can be passed to RGraphSpace methods.
# Node size (numeric in (0, 100), as '%' of the plot space)
V(gtoy1)$nodeSize <- c(10, 5, 5, 5, 5)
# Node shape (integer code between 0 and 25; see 'help(points)')
V(gtoy1)$nodeShape <- c(21, 22, 23, 24, 25)
# Node color (Hexadecimal or color name)
V(gtoy1)$nodeColor <- c("red", "#00ad39", "grey80", "blue", "cyan")
# Node line width (as in 'lwd' standard graphics; see 'help(gpar)')
V(gtoy1)$nodeLineWidth <- 1
# Node line color (Hexadecimal or color name)
V(gtoy1)$nodeLineColor <- "grey20"
# Node labels ('NA' will omit labels)
V(gtoy1)$nodeLabel <- c("V1", "V2", "V3", "V4", NA)
# Node label size (in pts)
V(gtoy1)$nodeLabelSize <- 12
# Node label color (Hexadecimal or color name)
V(gtoy1)$nodeLabelColor <- "grey40"
Given a list of edges, RGraphSpace represents only one edge for each pair of connected vertices. If there are multiple edges connecting the same vertex pairs, it will display the line attributes of the first edge in the list.
# Edge width (as in 'lwd' standard graphics; see 'help(gpar)')
E(gtoy1)$edgeLineWidth <- 1
# Edge color (Hexadecimal or color name)
E(gtoy1)$edgeLineColor <- c("red","green","blue","black")
# Edge type (as in 'lty' standard graphics; see 'help(gpar)')
E(gtoy1)$edgeLineType <- c("solid", "dotted", "dashed", "2121")
Arrowhead in directed graphs. By default, an arrow will be drawn for
each edge according to its left-to-right orientation in the edge list
(e.g. A -> B
).
# Arrowhead types in directed graphs (integer code or character)
## 0 = "---", 1 = "-->", -1 = "--|"
E(gtoy1)$arrowType <- 1
# Arrowhead length (as in 'lwd' standard graphics; see 'help(gpar)')
E(gtoy1)$arrowLength <- 1
Arrowhead in undirected graphs. By default, no arrow will be drawn in undirected graphs.
# Arrowhead types in undirected graphs (integer or character code)
## 0 = "---"
## 1 = "-->", 2 = "<--", 3 = "<->", 4 = "|->",
## -1 = "--|", -2 = "|--", -3 = "|-|", -4 = "<-|",
E(gtoy1)$arrowType <- 1
# Note: in undirected graphs, this attribute overrides the
# edge's orientation in the edge list
# Arrowhead length (as in 'lwd' standard graphics; see 'help(gpar)')
E(gtoy1)$arrowLength <- 1
… and now plot the updated igraph object with RGraphSpace:
# Plot the updated 'gtoy1' using RGraphSpace
plotGraphSpace(gtoy1, marks = "n1", mark.color = "white")
# Load RedeR, a graph package for interactive visualization
## Note: for this example, please use Bioc >= 3.19
if(!require("BiocManager", quietly = TRUE)){
install.packages("BiocManager")
#BiocManager::install(version = "3.19")
}
if(!require("RedeR", quietly = TRUE)){
BiocManager::install("RedeR")
}
# Launch the RedeR application
library(RedeR)
startRedeR()
resetRedeR()
# Send 'gtoy1' to the RedeR interface
addGraphToRedeR(gtoy1, unit="npc")
relaxRedeR()
# Fetch the graph with a fresh layout
gtoy2 <- getGraphFromRedeR(unit="npc")
# Check the round trip...
plotGraphSpace(gtoy2, marks = "n1", mark.color = "white")
## Note that for the round trip, shapes and line types are
## only partially compatible between ggplot2 and RedeR.
# ...alternatively, just update the graph layout
gtoy2 <- updateLayoutFromRedeR(g=gtoy1)
# ...check the updated layout
plotGraphSpace(gtoy2, marks = "n1", mark.color = "white")
If you use RGraphSpace, please cite:
Sysbiolab Team. “RGraphSpace: A lightweight package for representing large igraph objects in a normalized coordinate system.” R package, 2023. Doi: 10.32614/CRAN.package.RGraphSpace
Castro MA, Wang X, Fletcher MN, Meyer KB, Markowetz F (2012). “RedeR: R/Bioconductor package for representing modular structures, nested networks and multiple levels of hierarchical associations.” Genome Biology, 13(4), R29. Doi: 10.1186/gb-2012-13-4-r29
## R version 4.4.1 (2024-06-14)
## Platform: x86_64-pc-linux-gnu
## Running under: Ubuntu 22.04.4 LTS
##
## Matrix products: default
## BLAS: /usr/lib/x86_64-linux-gnu/atlas/libblas.so.3.10.3
## LAPACK: /usr/lib/x86_64-linux-gnu/atlas/liblapack.so.3.10.3; LAPACK version 3.10.0
##
## locale:
## [1] LC_CTYPE=pt_BR.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=pt_BR.UTF-8 LC_COLLATE=C
## [5] LC_MONETARY=pt_BR.UTF-8 LC_MESSAGES=en_US.UTF-8
## [7] LC_PAPER=pt_BR.UTF-8 LC_NAME=C
## [9] LC_ADDRESS=C LC_TELEPHONE=C
## [11] LC_MEASUREMENT=pt_BR.UTF-8 LC_IDENTIFICATION=C
##
## time zone: America/Sao_Paulo
## tzcode source: system (glibc)
##
## attached base packages:
## [1] stats graphics grDevices utils datasets methods base
##
## other attached packages:
## [1] RGraphSpace_1.0.6 ggplot2_3.5.0 igraph_2.0.2
##
## loaded via a namespace (and not attached):
## [1] vctrs_0.6.5 cli_3.6.2 knitr_1.46 rlang_1.1.3
## [5] xfun_0.43 highr_0.10 generics_0.1.3 jsonlite_1.8.8
## [9] glue_1.7.0 colorspace_2.1-0 htmltools_0.5.8.1 sass_0.4.9
## [13] fansi_1.0.6 scales_1.3.0 rmarkdown_2.26 grid_4.4.1
## [17] tibble_3.2.1 evaluate_0.23 munsell_0.5.1 jquerylib_0.1.4
## [21] fastmap_1.1.1 yaml_2.3.8 lifecycle_1.0.4 compiler_4.4.1
## [25] dplyr_1.1.4 pkgconfig_2.0.3 rstudioapi_0.15.0 farver_2.1.1
## [29] digest_0.6.35 R6_2.5.1 tidyselect_1.2.1 utf8_1.2.4
## [33] pillar_1.9.0 magrittr_2.0.3 bslib_0.7.0 withr_3.0.0
## [37] tools_4.4.1 gtable_0.3.4 cachem_1.0.8