R/guide-colourbar2.R

In houyunhuang/ggtriangle: Fast processing of matrix heatmap

#' Colour bar
#' @rdname colourbar
#' @inheritParams ggplot2::guide_colourbar
#' @importFrom ggplot2 guide_colourbar
#' @export
guide_colourbar2 <- function(
  available_aes = c("colour", "color", "colour.upper", "colour.lower",
                    "fill", "fill.upper", "fill.lower"),
  ...) {
  guide_colourbar(available_aes = available_aes, ...)
}

#' @rdname colourbar
#' @export
guide_colorbar2 <- guide_colourbar2