View source: R/sm_panel_label.R
| sm_panel_label | R Documentation | 
Writing a label for each panel of a combined figure
sm_panel_label(
  all_plots,
  x,
  y,
  panel_tag = "1",
  panel_pretag,
  panel_posttag,
  text_size = 5.5,
  text_color = "black",
  fontface = "plain",
  ...
)
all_plots | 
 all_plots should be a list vector, which should contain all panels that are to be combined into one figure.  | 
x | 
 Location of the label along the x-axis (0 to 1). 0.5 is the middle origin.  | 
y | 
 Location of the label along the y-axis (0 to 1). 0.5 is the middle origin.  | 
panel_tag | 
 A character vector that defines how each panel is enumerated. Options include: 'a', 'A', '1', 'I' or 'i'.'a' is for lowercase letters. 'A' is for uppercase letters. '1' is for integers. 'I' is for upper case roman numerals. 'i' is for lower case roman numerals. Each panel will display a unique string based on the set enumeration.  | 
panel_pretag | 
 A character vector that is identical across panels BEFORE the panel_tag.  | 
panel_posttag | 
 A character vector that is identical across panels AFTER the panel_tag.  | 
text_size | 
 Text size of the panel label  | 
text_color | 
 Text color of the panel label  | 
fontface | 
 Fontface of the panel label. Options include "plain", "bold", "italic" and others that are provided by ggplot2.  | 
... | 
 Additional parameters for adjusting the appearance of the sticker. Same parameters for annotate() from ggplot2.  | 
It returns a list of plots with panel labels.
library(ggplot2)
library(smplot2)
ggplot(data = mtcars, mapping = aes(x = drat, y = mpg)) +
geom_point(shape = 21, fill = '#0f993d', color = 'white',
          size = 3) -> p1
ggplot(data = mtcars, mapping = aes(x = drat, y = mpg)) +
 geom_point(shape = 21, fill = '#0f993d', color = 'white', size = 3) +
 sm_hvgrid() -> p2
sm_panel_label(list(p1,p2), x = 0.1, y = 0.9,
              panel_tag ='1', panel_pretag = 'S', text_size = 4, text_color = 'black')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.