R/globals.R

In danielmarcelino/ggdecor: A Collection of Themes and Aesthetics

"%||%" <- function(a, b) {
  if (!is.null(a)) a else b
}

# Imports from magrittr

#' @importFrom magrittr %>%
`%>%` <- magrittr::`%>%`
#' @importFrom magrittr %<>%
`%<>%` <- magrittr::`%<>%`
#' @importFrom magrittr add
magrittr <- magrittr::add
#' @importFrom magrittr use_series
use_series <- magrittr::use_series
#' @importFrom magrittr extract
extract <- magrittr::extract
#' @importFrom magrittr set_names
set_names <- magrittr::set_names
#' @importFrom magrittr subtract
subtract <- magrittr::subtract
#' @importFrom magrittr raise_to_power
raise_to_power <- magrittr::raise_to_power
#' @importFrom magrittr multiply_by
multiply_by <- magrittr::multiply_by
#' @importFrom tidyselect eval_select
eval_select <- tidyselect::eval_select

# Imports from ggplot2

#' @importFrom ggplot2 ggplot
ggplot <- ggplot2::ggplot
#' @importFrom ggplot2 geom_point
geom_point <- ggplot2::geom_point
#' @importFrom ggplot2 scale_color_manual
scale_color_manual <- ggplot2::scale_color_manual
#' @importFrom ggplot2 geom_abline
geom_abline <- ggplot2::geom_abline
#' @importFrom ggplot2 ggsave
ggsave <- ggplot2::ggsave
#' @importFrom ggplot2 stat_function
stat_function <- ggplot2::stat_function
#' @importFrom ggplot2 geom_hline
geom_hline <- ggplot2::geom_hline
#' @importFrom ggplot2 geom_vline
geom_vline <- ggplot2::geom_vline
#' @importFrom ggplot2 annotate
annotate <- ggplot2::annotate
#' @importFrom ggplot2 xlab
xlab <- ggplot2::xlab
#' @importFrom ggplot2 ylab
ylab <- ggplot2::ylab
#' @importFrom ggplot2 geom_line
geom_line <- ggplot2::geom_line
#' @importFrom ggplot2 geom_segment
geom_segment <- ggplot2::geom_segment
#' @importFrom ggplot2 aes_string
aes_string <- ggplot2::aes_string
#' @importFrom ggplot2 aes
aes <- ggplot2::aes
#' @importFrom ggplot2 ylim
ylim <- ggplot2::ylim

# Imports from gridExtra

#' @importFrom gridExtra arrangeGrob
arrangeGrob <- gridExtra::arrangeGrob