From a88bef1ac84f2247a8fad524da866cdf280d2fa7 Mon Sep 17 00:00:00 2001
From: Daniel <mail@danielluedecke.de>
Date: Mon, 10 Jun 2024 22:54:53 +0200
Subject: [PATCH] fix

---
 R/print.compare_parameters.R    | 2 +-
 man/print.compare_parameters.Rd | 2 ++
 pkgdown/_pkgdown.yml            | 1 +
 3 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/R/print.compare_parameters.R b/R/print.compare_parameters.R
index f4ef5a200..61cf91560 100644
--- a/R/print.compare_parameters.R
+++ b/R/print.compare_parameters.R
@@ -16,7 +16,7 @@
 #'
 #' @return Invisibly returns the original input object.
 #'
-#' @examples
+#' @examplesIf require("gt", quietly = TRUE)
 #' \donttest{
 #' data(iris)
 #' lm1 <- lm(Sepal.Length ~ Species, data = iris)
diff --git a/man/print.compare_parameters.Rd b/man/print.compare_parameters.Rd
index 3dc6cdb69..c09b5a9b4 100644
--- a/man/print.compare_parameters.Rd
+++ b/man/print.compare_parameters.Rd
@@ -246,6 +246,7 @@ create HTML tables. If set to \code{tt}, the \emph{tinytable} package is used.
 }
 
 \examples{
+\dontshow{if (require("gt", quietly = TRUE)) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf}
 \donttest{
 data(iris)
 lm1 <- lm(Sepal.Length ~ Species, data = iris)
@@ -259,4 +260,5 @@ print(result)
 result <- compare_parameters(lm1, lm2, select = "{estimate}<br>({se})|{p}")
 print_html(result)
 }
+\dontshow{\}) # examplesIf}
 }
diff --git a/pkgdown/_pkgdown.yml b/pkgdown/_pkgdown.yml
index a6fef29f8..2a2543b5b 100644
--- a/pkgdown/_pkgdown.yml
+++ b/pkgdown/_pkgdown.yml
@@ -102,6 +102,7 @@ reference:
       - format_parameters
       - format_p_adjust
       - format_df_adjust
+      - format.compare_parameters
       - parameters_type
       - print_md