[Rcpp-commits] r3412 - pkg/Rcpp/inst/unitTests

[noreply at r-forge.r-project.org]

Author: dmbates
Date: 2011-12-16 19:35:19 +0100 (Fri, 16 Dec 2011)
New Revision: 3412

Modified:
   pkg/Rcpp/inst/unitTests/runit.stats.R
Log:
Correct a cut-and-paste error in test.stats.qbinom


Modified: pkg/Rcpp/inst/unitTests/runit.stats.R
===================================================================
--- pkg/Rcpp/inst/unitTests/runit.stats.R	2011-12-16 18:34:50 UTC (rev 3411)
+++ pkg/Rcpp/inst/unitTests/runit.stats.R	2011-12-16 18:35:19 UTC (rev 3412)
@@ -549,7 +549,7 @@
     n <- 20
     p <- 0.5
     vv <- seq(0, 1, by = 0.1)
-    checkEquals(fx(vv, location, scale),
+    checkEquals(fx(vv, n, p),
                 list(lower = qbinom(vv, n, p),
                      upper = qbinom(vv, n, p, lower=FALSE)
                      ),