[Distr-commits] r939 - in branches/distr-2.6/pkg/distrMod: R man

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

Author: ruckdeschel
Date: 2014-07-22 19:04:31 +0200 (Tue, 22 Jul 2014)
New Revision: 939

Modified:
   branches/distr-2.6/pkg/distrMod/R/qqplot.R
   branches/distr-2.6/pkg/distrMod/man/qqplot.Rd
Log:
[distrMod] debug option for qqbounds

Modified: branches/distr-2.6/pkg/distrMod/R/qqplot.R
===================================================================
--- branches/distr-2.6/pkg/distrMod/R/qqplot.R	2014-07-22 16:47:58 UTC (rev 938)
+++ branches/distr-2.6/pkg/distrMod/R/qqplot.R	2014-07-22 17:04:31 UTC (rev 939)
@@ -96,7 +96,8 @@
              legend.cex = 0.8,     ## magnification factor for the legend
              legend.pref = "",     ## prefix for legend  text
              legend.postf = "",    ## postfix for legend text
-             legend.alpha = alpha.CI ## nominal level of CI
+             legend.alpha = alpha.CI, ## nominal level of CI
+             debug = FALSE ## shall additional debug output be printed out?
     ){ ## return value as in stats::qqplot
 
     mc <- match.call(call = sys.call(sys.parent(1)))
@@ -214,10 +215,10 @@
                   nosym.pCI = nosym.pCI, with.legend = with.legend,
                   legend.bg = legend.bg, legend.pos = legend.pos,
                   legend.cex = legend.cex, legend.pref = legend.pref,
-                  legend.postf = legend.postf, legend.alpha = legend.alpha)
+                  legend.postf = legend.postf, legend.alpha = legend.alpha, debug = debug)
         }else{
            qqb <- qqbounds(sort(unique(xy)),y,alpha.CI,n,withConf.pw, withConf.sim,
-                           exact.sCI,exact.pCI,nosym.pCI)
+                           exact.sCI,exact.pCI,nosym.pCI, debug = debug)
         }
        }
     }

Modified: branches/distr-2.6/pkg/distrMod/man/qqplot.Rd
===================================================================
--- branches/distr-2.6/pkg/distrMod/man/qqplot.Rd	2014-07-22 16:47:58 UTC (rev 938)
+++ branches/distr-2.6/pkg/distrMod/man/qqplot.Rd	2014-07-22 17:04:31 UTC (rev 939)
@@ -23,7 +23,8 @@
     check.NotInSupport = TRUE, col.NotInSupport = "red",
     with.legend = TRUE, legend.bg = "white",
     legend.pos = "topleft", legend.cex = 0.8, 
-    legend.pref = "", legend.postf = "",  legend.alpha = alpha.CI)
+    legend.pref = "", legend.postf = "",  legend.alpha = alpha.CI,
+    debug = FALSE)
 \S4method{qqplot}{ANY,ProbFamily}(x, y,
    n = length(x), withIdLine = TRUE, withConf = TRUE,
    withConf.pw  = withConf,  withConf.sim = withConf,
@@ -110,6 +111,7 @@
 \item{legend.pref}{character to be prepended to legend text}
 \item{legend.postf}{character to be appended to legend text}
 \item{legend.alpha}{nominal coverage probability}
+\item{debug}{logical; if \code{TRUE} additional output to debug confidence bounds.}
 }
 \description{
   We generalize function \code{\link[stats:qqnorm]{qqplot}} from package \pkg{stats} to