update

R/plot_assumptions.R

@@ -15,11 +15,14 @@
 #'
 #' @return Invisibly returns an object of class \code{mediation_model}.
 #'
-#' @examples
+#' @examplesIf rlang::is_installed("see")
+#'
 #' data(ho_et_al)
+#'
 #' ho_et_al$condition_c <- build_contrast(ho_et_al$condition,
 #'                                        "Low discrimination",
 #'                                        "High discrimination")
+#'
 #' my_model <-
 #'   mdt_simple(data = ho_et_al,
 #'              IV = condition_c,