From ddeacf169a275e0f078217ec7616d2c12e734417 Mon Sep 17 00:00:00 2001 From: Daniel Date: Tue, 19 Sep 2023 16:54:37 +0200 Subject: [PATCH] docs --- R/methods_aov.R | 6 ++++-- man/model_parameters.aov.Rd | 6 ++++-- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/R/methods_aov.R b/R/methods_aov.R index 8028879cd..23bf32c85 100644 --- a/R/methods_aov.R +++ b/R/methods_aov.R @@ -79,9 +79,11 @@ #' model <- aov(Sepal.Length ~ Sepal.Big + Error(Species), data = df) #' model_parameters(model) #' -#' @examplesIf requireNamespace("lme4", quietly = TRUE) +#' @examplesIf requireNamespace("lme4", quietly = TRUE) && requireNamespace("effectsize", quietly = TRUE) #' \donttest{ -#' mm <- lmer(Sepal.Length ~ Sepal.Big + Petal.Width + (1 | Species), data = df) +#' df <- iris +#' df$Sepal.Big <- ifelse(df$Sepal.Width >= 3, "Yes", "No") +#' mm <- lme4::lmer(Sepal.Length ~ Sepal.Big + Petal.Width + (1 | Species), data = df) #' model <- anova(mm) #' #' # simple parameters table diff --git a/man/model_parameters.aov.Rd b/man/model_parameters.aov.Rd index d2f76479f..a4e8fec13 100644 --- a/man/model_parameters.aov.Rd +++ b/man/model_parameters.aov.Rd @@ -276,9 +276,11 @@ model_parameters( model <- aov(Sepal.Length ~ Sepal.Big + Error(Species), data = df) model_parameters(model) \dontshow{\}) # examplesIf} -\dontshow{if (requireNamespace("lme4", quietly = TRUE)) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} +\dontshow{if (requireNamespace("lme4", quietly = TRUE) && requireNamespace("effectsize", quietly = TRUE)) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} \donttest{ -mm <- lmer(Sepal.Length ~ Sepal.Big + Petal.Width + (1 | Species), data = df) +df <- iris +df$Sepal.Big <- ifelse(df$Sepal.Width >= 3, "Yes", "No") +mm <- lme4::lmer(Sepal.Length ~ Sepal.Big + Petal.Width + (1 | Species), data = df) model <- anova(mm) # simple parameters table