Commit b1dee674 authored by houyun's avatar houyun
Browse files

can output expression

parent 4b0bda45

R/geom-magic-text.R

+1 −1
Original line number Diff line number Diff line
@@ -248,7 +248,7 @@ latex_expression <- function(x, 
#' @rdname latex_expression

#' @export

parse_func <- function(..., output = "character") {

  output <- match.arg(output, c("character", "richtext"))

  output <- match.arg(output, c("character", "richtext", "expression"))

  if (output == "richtext") {

    function(x) {

      latex_richtext(x = x, ...)

CRA Git | Maintained and supported by SUSTech CRA and CCSE