add.quadrant.labels: Annotate labels to the quadrants of an MCA or any ggplot2...

In Rsoc/soc.ca: Specific Correspondence Analysis for the Social Sciences

Annotate labels to the quadrants of an MCA or any ggplot2 based quadrant plot.

Description

This function is a convience function that uses annotate to easily create labels for the quadrants.

Usage

add.quadrant.labels(
  quadrant.labels = c("A", "B", "C", "D"),
  distance = "npc",
  geom = "label",
  color = "black",
  ...
)

Arguments

quadrant.labels
distance	if equal to "npc" labels are positioned dynamically at the edges of the plot. see annotate. If a numeric vector it is interpreted as the distance to 0 on both X and Y.
geom	controls the annotation geom; usually you would use "text" or "label".
color	either a single value or 4 values that control the color of the labels
...	further arguments are passed onto annotate

Value

a ggplot2 layer that can be added to an existing ggplot object.

Examples

example(soc.mca)
map.ind(result, point.size = 1) + add.quadrant.labels()
labels <- c("Dominant:\nCultural fraction", "Dominant:\nEconomic fraction", "Dominated:\nEconomic fraction", "Dominated:\nCultural fraction")
map.ca.base() + add.quadrant.labels(labels, geom = "text")
map.ca.base() + add.ind(result, color = "grey80") + add.quadrant.labels(labels, geom = "text", distance = 1) 
map.ca.base() + add.categories(result, color = "grey50", check_overlap = TRUE) + add.quadrant.labels(labels, geom = "label", distance = 0.5, fill = c("#E41A1C", "#377EB8", "#4DAF4A", "#984EA3"), alpha = 0.3) 

Rsoc/soc.ca documentation built on March 7, 2024, 8:59 p.m.