Fix documentation

R/app_ped_avaf_infos.R

@@ -85,7 +85,7 @@ family_infos_table <- function(pedi, col_val = NA) {
 }
 
 
-#' @rdname family_sel
+#' @rdname ped_avaf_infos
 #' @importFrom shiny NS column uiOutput textOutput
 #' @importFrom DT dataTableOutput
 ped_avaf_infos_ui <- function(id, height = "auto") {

R/app_plot_legend.R

@@ -19,6 +19,7 @@ plot_legend_ui <- function(id, height = "200px") {
 #'
 #' @param id A string.
 #' @param pedi A reactive pedigree object.
+#' @inheritParams plot_legend
 #' @returns A static UI with the legend.
 #' @examples
 #' if (interactive()) {

R/app_plot_ped.R

@@ -30,6 +30,7 @@ plot_ped_ui <- function(id) {
 #' @param title A string to name the plot.
 #' @param precision An integer to set the precision of the plot.
 #' @param max_ind An integer to set the maximum number of individuals to plot.
+#' @inheritParams plot_pedigree
 #' @returns A reactive ggplot or the pedigree object.
 #' @examples
 #' if (interactive()) {