ggcall: Generate code to create a 'ggplot2'

In dtsonipmph/esquisse: Explore and Visualize Your Data Interactively

Description

Generate code to create a ggplot2

Usage

ggcall(
  data = NULL,
  mapping = NULL,
  geom = NULL,
  geom_args = list(),
  scales = NULL,
  scales_args = list(),
  coord = NULL,
  labs = list(),
  theme = NULL,
  theme_args = list(),
  facet = NULL,
  facet_row = NULL,
  facet_col = NULL,
  facet_args = list(),
  xlim = NULL,
  ylim = NULL
)

Arguments

data	Character. Name of the data.frame.
mapping	List. Named list of aesthetics.
geom	Character. Name of the geom to use (with or without "geom_").
geom_args	List. Arguments to use in the geom.
scales	Character vector. Scale(s) to use (with or without "scale_").
scales_args	List. Arguments to use in scale(s), if scales is length > 1, must be a named list with scales names.
coord	Character. Coordinates to use (with or without "coord_").
labs	List. Named list of labels to use for title, subtitle, x & y axis, legends.
theme	Character. Name of the theme to use (with or without "theme_").
theme_args	Named list. Arguments for theme.
facet	Character vector. Names of variables to use in facet_wrap.
facet_row	Character vector. Names of row variables to use in facet_grid.
facet_col	Character vector. Names of col variables to use in facet_grid.
facet_args	Named list. Arguments for facet_wrap.
xlim	A vector of length 2 representing limits on x-axis.
ylim	A vector of length 2 representing limits on y-axis.

Value

a call that can be evaluated with eval.

Examples

# Default:
ggcall()

# With data and aes
ggcall("mtcars", list(x = "mpg", y = "wt"))

# Evaluate the call
library(ggplot2)
eval(ggcall("mtcars", list(x = "mpg", y = "wt")))


# With a geom:
ggcall(
  data = "mtcars",
  mapping = list(x = "mpg", y = "wt"),
  geom = "point"
)

# With options
ggcall(
  data = "mtcars",
  mapping = list(x = "hp", y = "cyl", fill = "color"),
  geom = "bar",
  coord = "flip",
  labs = list(title = "My title"),
  theme = "minimal",
  facet = c("gear", "carb"),
  theme_args = list(legend.position = "bottom")
)

# Theme
ggcall(
  "mtcars", list(x = "mpg", y = "wt"),
  theme = "theme_minimal",
  theme_args = list(
    panel.ontop = TRUE,
    legend.title = rlang::expr(element_text(face = "bold"))
  )
)

# Theme from other package than ggplot2
ggcall(
  "mtcars", list(x = "mpg", y = "wt"),
  theme = "ggthemes::theme_economist"
)


# One scale
ggcall(
  data = "mtcars",
  mapping = list(x = "mpg", y = "wt", color = "qsec"),
  geom = "point",
  scales = "color_distiller",
  scales_args = list(palette = "Blues")
)

# Two scales
ggcall(
  data = "mtcars",
  mapping = list(x = "mpg", y = "wt", color = "qsec", size = "qsec"),
  geom = "point",
  scales = c("color_distiller", "size_continuous"),
  scales_args = list(
    color_distiller = list(palette = "Greens"),
    size_continuous = list(range = c(1, 20))
  )
)

dtsonipmph/esquisse documentation built on Sept. 14, 2020, 9:34 a.m.