fix Rd mark in concept

R/alignpatch-inset.R

@@ -83,7 +83,7 @@ patch.default <- function(x, ...) {
 #' @inherit patch title description return
 #' @inheritParams patch
 #' @param ... Not used currently.
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.grob <- function(x, ...) {
     x
@@ -99,7 +99,7 @@ patch.gList <- function(x, ...) {
 #' @importFrom ggplot2 ggplotGrob
 #' @inherit patch.grob
 #' @seealso [ggplot][ggplot2::ggplot]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.ggplot <- function(x, ...) {
     ggplotGrob(x)
@@ -110,23 +110,23 @@ patch.ggplot <- function(x, ...) {
 #' - [`patch_titles()`]
 #' - [`inset()`]
 #' - [`ggwrap()`]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.patch_ggplot <- function(x, ...) {
     ggalignGrob(x)
 }
 
 #' @inherit patch.grob
 #' @seealso [`alignpatches`][align_plots]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.alignpatches <- function(x, ...) {
     ggalignGrob(x)
 }
 
 #' @inherit patch.grob
 #' @seealso [`patchwork`][patchwork::patchworkGrob]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.patchwork <- function(x, ...) {
     rlang::check_installed("patchwork", "to make grob from patchwork")
@@ -135,7 +135,7 @@ patch.patchwork <- function(x, ...) {
 
 #' @inherit patch.grob
 #' @seealso [`patch`][patchwork::patchGrob]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.patch <- function(x, ...) {
     rlang::check_installed("patchwork", "to make grob from patch")
@@ -146,7 +146,7 @@ patch.patch <- function(x, ...) {
 #' @param ... Graphical Parameters passed on to [par()][graphics::par].
 #' @inheritParams gridGraphics::echoGrob
 #' @seealso [`plot()`]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.formula <- function(x, ..., device = NULL, name = NULL) {
     rlang::check_installed("gridGraphics", "to make grob from base plot")
@@ -185,7 +185,7 @@ patch.function <- function(x, ..., device = NULL, name = NULL) {
 #' @inherit patch.grob
 #' @inheritParams gridGraphics::echoGrob
 #' @seealso [`recordPlot()`][grDevices::recordPlot]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.recordedplot <- function(x, ..., device = NULL) {
     rlang::check_installed("gridGraphics", "to make grob from recordedplot")
@@ -206,7 +206,7 @@ offscreen <- function(width, height) {
 #' @inheritDotParams grid::grid.grabExpr -expr -device
 #' @inheritParams grid::grid.grabExpr
 #' @seealso [`trellis`][lattice::trellis.object]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.trellis <- function(x, ..., device = NULL) {
     grid::grid.grabExpr(expr = print(x), ..., device = device %||% offscreen)
@@ -218,7 +218,7 @@ patch.trellis <- function(x, ..., device = NULL) {
 #' @seealso
 #'  - [`Heatmap()`][ComplexHeatmap::Heatmap]
 #'  - [`HeatmapAnnotation()`][ComplexHeatmap::HeatmapAnnotation]
-#' @family `patch` methods
+#' @family patch methods
 #' @importFrom utils getFromNamespace
 #' @export
 patch.Heatmap <- function(x, ..., device = NULL) {
@@ -243,6 +243,6 @@ patch.HeatmapAnnotation <- patch.HeatmapList
 
 #' @inherit patch.grob
 #' @seealso [`pheatmap()`][pheatmap::pheatmap]
-#' @family `patch` methods
+#' @family patch methods
 #' @export
 patch.pheatmap <- function(x, ...) .subset2(x, "gtable")

R/fortify-data_frame.R

@@ -20,7 +20,7 @@ fortify_data_frame <- function(data, ...) {
 #' @description
 #' By default, it calls [`fortify()`][ggplot2::fortify] to build the
 #' data frame.
-#' @family [`fortify_data_frame()`] methods
+#' @family fortify_data_frame methods
 #' @export
 fortify_data_frame.default <- function(data, ...) {
     ggplot2::fortify(model = data, ...)
@@ -34,7 +34,7 @@ fortify_data_frame.default <- function(data, ...) {
 #'  - `.names`: the names for the vector (only applicable if names exist).
 #'  - `value`: the actual value of the vector.
 #'
-#' @family [`fortify_data_frame()`] methods
+#' @family fortify_data_frame methods
 #' @export
 fortify_data_frame.character <- function(data, ...) {
     ans <- list(.names = vec_names(data), value = data)
@@ -43,7 +43,7 @@ fortify_data_frame.character <- function(data, ...) {
 }
 
 #' @inherit fortify_data_frame.character
-#' @family [`fortify_data_frame()`] methods
+#' @family fortify_data_frame methods
 #' @export
 fortify_data_frame.numeric <- fortify_data_frame.character
 
@@ -58,7 +58,7 @@ fortify_data_frame.NULL <- function(data, ...) data
 #' When `data` is a matrix, it will automatically be transformed into a
 #' long-form data frame, where each row represents a unique combination of
 #' matrix indices and their corresponding values.
-#' @family [`fortify_data_frame()`] methods
+#' @family fortify_data_frame methods
 #' @export
 fortify_data_frame.matrix <- function(data, ...) {
     row_nms <- vec_names(data)

R/fortify-matrix.R

@@ -17,7 +17,7 @@ fortify_matrix <- function(data, ...) {
 #' @inherit fortify_matrix
 #' @description
 #' By default, it calls [`as.matrix()`] to build a matrix.
-#' @family [`fortify_matrix()`] methods
+#' @family fortify_matrix methods
 #' @importFrom rlang try_fetch
 #' @export
 fortify_matrix.default <- function(data, ...) {
@@ -65,7 +65,7 @@ fortify_matrix.formula <- function(data, ...) rlang::as_function(data)
 #'  - `n_samples`: Total of samples
 #'  - `breaks`: factor levels of `Variant_Classification`, if `collapse_vars =
 #'    TRUE`, `"Multi_Hit"` will be added in the end.
-#' @family [`fortify_matrix()`] methods
+#' @family fortify_matrix methods
 #' @export
 fortify_matrix.MAF <- function(data, ..., genes = NULL, n_top = NULL,
                                remove_empty_samples = TRUE,