Update pwr.r.test.R (#9)

* Add repository metadata [ci skip] * Update pwr.r.test.R increased the limit for n
heliosdrm · Oct 6, 2016 · f3f0d69 · f3f0d69
1 parent 15a7dd9
commit f3f0d69
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/pwr.r.test.R b/R/pwr.r.test.R
@@ -51,7 +51,7 @@ r<--r
         power <- eval(p.body)
     else if (is.null(n)) 
         n <- uniroot(function(n) eval(p.body) - power, c(4 + 
-            1e-10, 1e+07))$root
+            1e-10, 1e+09))$root
     else if (is.null(r)) 
         {
 	if(tside==2){r <- uniroot(function(r) eval(p.body) - power,