execute contr() example in R CMD check

closes #461
easystats · Oct 6, 2023 · 0f467d0 · 0f467d0
1 parent b42571d
commit 0f467d0
Show file tree

Hide file tree

Showing 4 changed files with 10 additions and 6 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Type: Package
 Package: datawizard
 Title: Easy Data Wrangling and Statistical Transformations
-Version: 0.9.0
+Version: 0.9.0.1
 Authors@R: c(
     person("Indrajeet", "Patil", , "[email protected]", role = "aut",
            comment = c(ORCID = "0000-0003-1995-6531", Twitter = "@patilindrajeets")),

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,5 @@
+# datawizard 0.9.0.9000 (development version)
+
 # datawizard 0.9.0
 
 NEW FUNCTIONS

diff --git a/R/contrs.R b/R/contrs.R
@@ -32,8 +32,8 @@
 #'
 #' @seealso [stats::contr.sum()]
 #'
-#' @examples
-#' if (FALSE) {
+#' @examplesIf !identical(Sys.getenv("IN_PKGDOWN"), "true")
+#' \donttest{
 #'   data("mtcars")
 #'
 #'   mtcars <- data_modify(mtcars, cyl = factor(cyl))
@@ -83,7 +83,8 @@
 #' }
 #'
 #' @export
-contr.deviation <- function(n, base = 1,
+contr.deviation <- function(n,
+                            base = 1,
                             contrasts = TRUE,
                             sparse = FALSE) {
   cont <- stats::contr.treatment(n,

diff --git a/man/contr.deviation.Rd b/man/contr.deviation.Rd