R/rightLeft.R

Defines functions rightLeft

Documented in rightLeft

#' Right-Left labels
#'
#' Right-Left labels
#' @param len lenght of labels
#' @export
rightLeft <- function(len = c('long', 'short')) {
  len <- match.arg(len)
  switch(len,
         short = c('R','L'),
         long = c('Right', 'Left')
         )
}
lbraglia/lbls documentation built on May 10, 2023, 11:06 p.m.