[r-cran-mi] 12/13: tests-no-betareg.patch: new patch, makes tests succeed without betareg.

[Sébastien Villemot]

This is an automated email from the git hooks/post-receive script.

sebastien pushed a commit to branch master
in repository r-cran-mi.

commit 62aafed5b9101310b10f60bdf2d8d39d014f9ebf
Author: Sébastien Villemot <sebastien at debian.org>
Date:   Sun Oct 1 21:30:22 2017 +0200

    tests-no-betareg.patch: new patch, makes tests succeed without betareg.
---
 debian/patches/series                 |  1 +
 debian/patches/tests-no-betareg.patch | 47 +++++++++++++++++++++++++++++++++++
 2 files changed, 48 insertions(+)

diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..a1ba7ff
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+tests-no-betareg.patch
diff --git a/debian/patches/tests-no-betareg.patch b/debian/patches/tests-no-betareg.patch
new file mode 100644
index 0000000..aad509a
--- /dev/null
+++ b/debian/patches/tests-no-betareg.patch
@@ -0,0 +1,47 @@
+Description: Remove tests that need the betareg CRAN package
+ This package is not yet in Debian, still we want the autopkgtest to succeed.
+Author: Sébastien Villemot <sebastien at debian.org>
+Forwarded: not-needed
+Last-Update: 2017-10-01
+---
+This patch header follows DEP-3: http://dep.debian.net/deps/dep3/
+--- a/tests/missing_data.frame.R
++++ b/tests/missing_data.frame.R
+@@ -3,17 +3,17 @@ stopifnot(require(mi))
+ rdf <- rdata.frame(N = 100, n_partial = 2, n_full = 2)
+ mdf <- missing_data.frame(rdf$obs)
+ 
+-rdf <- rdata.frame(N = 100, n_partial = 6, n_full = 1, 
++rdf <- rdata.frame(N = 100, n_partial = 5, n_full = 1, 
+                    types = c("ordinal", "cont", "count", "binary",
+-                             "proportion", "positive", "nominal"))
++                             "positive", "nominal"))
+ mdf <- missing_data.frame(rdf$obs)
+ mdf <- missing_data.frame(rdf$obs, favor_positive = TRUE)
+ 
+-rdf <- rdata.frame(N = 100, n_partial = 5, n_full = 1, experiment = TRUE,
++rdf <- rdata.frame(N = 100, n_partial = 4, n_full = 1, experiment = TRUE,
+                    types = c("treatment", "cont", "count", "binary",
+-                             "proportion", "positive"))
++                             "positive"))
+ mdf <- missing_data.frame(rdf$obs, subclass = "experiment", concept = 
+-                          as.factor(c("treatment", rep("covariate", 4), "outcome")))
++                          as.factor(c("treatment", rep("covariate", 3), "outcome")))
+ 
+ rdf <- rdata.frame(N = 100, n_partial = 5, n_full = 0, types = "ordinal")
+ mdf <- missing_data.frame(rdf$obs, subclass = "allcategorical")
+--- a/tests/missing_variable.R
++++ b/tests/missing_variable.R
+@@ -24,12 +24,8 @@ x <- runif(10)
+ x[1] <- NA
+ y <- missing_variable(x, type = "bounded-continuous", lower = 0, upper = 1)
+ y <- missing_variable(x, type = "positive-continuous")
+-y <- missing_variable(x, type = "proportion")
+ x[which.min(x)] <- 0
+ y <- missing_variable(x, type = "nonnegative-continuous")
+-y <- missing_variable(x, type = "SC_proportion")
+-x[which.max(x)] <- 1
+-y <- missing_variable(x, type = "SC_proportion")
+ 
+ x <- rpois(10, lambda = 5)
+ x[1] <- NA

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-science/packages/r-cran-mi.git