R/utilities.R

Defines functions has_groups ggname

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

ggname <- function(prefix, grob) {
  grob$name <- grid::grobName(grob, prefix)
  grob
}

has_groups <- function(data) {
  data$group[1L] != -1L
}
jrodu/qqboxplot documentation built on Jan. 30, 2023, 6:03 a.m.