rename element_magic_text to element_formula (f5d756d1) · Commits · github_fork / LinkET

NAMESPACE

+2 −2

Original line number	Diff line number	Diff line
		@@ -12,7 +12,7 @@ S3method(as.data.frame,md_tbl)
		S3method(as_md_tbl,corr.test)
		S3method(as_tibble,md_tbl)
		S3method(c,marker)
		S3method(element_grob,element_magic_text)
		S3method(element_grob,element_formula)
		S3method(get_order,character)
		S3method(get_order,dendrogram)
		S3method(get_order,dist)
		@@ -83,7 +83,7 @@ export(contain_with)
		export(correlate)
		export(dist_func)
		export(draw_key_marker)
		export(element_magic_text)
		export(element_formula)
		export(extract_diag)
		export(extract_lower)
		export(extract_nodes)

+16 −16

Original line number	Diff line number	Diff line
		@@ -41,7 +41,7 @@ label_formula <- function (parse = TRUE) {

		#' @importFrom ggplot2 element_grob
		#' @export
		element_grob.element_magic_text <- function(element, label = "", ...) {
		element_grob.element_formula <- function(element, label = "", ...) {
		if (is.null(label)) {
		return(ggplot2::zeroGrob())
		}
		@@ -65,7 +65,7 @@ element_grob.element_magic_text <- function(element, label = "", ...) {
		ggplot2::element_grob(element = element, label = label, ...)
		}

		#' @title Theme element that enables magic text
		#' @title Theme element that enables formula
		#' @description theme element that can parse text to expression or richtext.
		#' @inheritParams ggplot2::element_text
		#' @param parse logical or a parse function. IF TRUE (default), the labels will
		@@ -74,7 +74,7 @@ element_grob.element_magic_text <- function(element, label = "", ...) {
		#' @rdname element_magic_text
		#' @author Hou Yun
		#' @export
		element_magic_text <- function(parse = TRUE,
		element_formula <- function(parse = TRUE,
		family = NULL,
		face = NULL,
		size = NULL,
		@@ -111,6 +111,6 @@ element_magic_text <- function(parse = TRUE,
		margin = margin,
		debug = debug,
		inherit.blank = inherit.blank),
		class = c("element_magic_text", "element_text", "element"))
		class = c("element_formula", "element_text", "element"))

		}

+4 −4

Original line number	Diff line number	Diff line
		% Generated by roxygen2: do not edit by hand
		% Please edit documentation in R/gg-utils.R
		\name{element_magic_text}
		\alias{element_magic_text}
		\title{Theme element that enables magic text}
		\name{element_formula}
		\alias{element_formula}
		\title{Theme element that enables formula}
		\usage{
		element_magic_text(
		element_formula(
		parse = TRUE,
		family = NULL,
		face = NULL,