RGraphSpace (version 1.5.2)

annotation_gspace_image: Annotate a GraphSpace Plot with an Image

Description

annotation_gspace_image() adds an image annotation layer to a ggplot-based GraphSpace plot.

Usage

annotation_gspace_image(
  x,
  interpolate = FALSE,
  opacity = 1,
  flip.v = FALSE,
  flip.h = FALSE,
  na.color = NA
)
annotation_gspace(...)

Value

A ggplot2 layer object that can be added to a ggplot()

call with +, or invisible(NULL) with a warning if the image could not be resolved.

Arguments

x

An image to be displayed. Accepted types:

• A GraphSpace object — the image is extracted via gs_image.

• A raster object (see as.raster).

• A matrix or 3D array (RGB/RGBA), coerced to raster automatically.

interpolate

A logical value indicating whether to apply linear interpolation when the image is rendered at a different resolution than its native size. Defaults to FALSE.

opacity

A numeric value in [0, 1] controlling the transparency of the image. 1 is fully opaque (default); 0 is fully transparent.

flip.v

A logical value; if TRUE, the image is flipped vertically (top-to-bottom). Defaults to FALSE.

flip.h

A logical value; if TRUE, the image is flipped horizontally (left-to-right). Defaults to FALSE.

na.color

The colour to map to NA values. Defaults to NA.

...

Additional arguments (currently unused).

See Also

annotation_raster, gs_image, geom_nodespace, geom_edgespace

Examples

library(RGraphSpace)
library(igraph)

# Load a demo igraph
data('gtoy1', package = 'RGraphSpace')
gs <- GraphSpace(gtoy1)

# Normalize node coordinates
gs <- normalizeGraphSpace(gs)

# Add a raster image
gs_image(gs) <- as_colorraster(volcano)

if (FALSE) {
# Pass a GraphSpace object directly
ggplot(gs) +
  annotation_gspace_image(gs) +
  geom_edgespace() +
  geom_nodespace()

# Extract the image explicitly
ggplot(gs) +
  annotation_gspace_image(gs_image(gs)) +
  geom_edgespace() +
  geom_nodespace()

# Dim the background and flip vertically
ggplot(gs) +
  annotation_gspace_image(gs, opacity = 0.5, flip.v = TRUE) +
  geom_edgespace() +
  geom_nodespace()
  
}