[Distr-commits] r100 - pkg/distr/R

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

Author: stamats
Date: 2008-02-27 06:39:11 +0100 (Wed, 27 Feb 2008)
New Revision: 100

Modified:
   pkg/distr/R/AllInitialize.R
Log:
changed NaN's to NaNs

Modified: pkg/distr/R/AllInitialize.R
===================================================================
--- pkg/distr/R/AllInitialize.R	2008-02-27 05:36:03 UTC (rev 99)
+++ pkg/distr/R/AllInitialize.R	2008-02-27 05:39:11 UTC (rev 100)
@@ -330,7 +330,7 @@
             body(.Object at q) <- substitute( 
                 { if (log.p) p <- exp(p)
                   if(any((p < 0)|(p > 1))) 
-                     warning("q Method of class Dirac produced NaN's.")
+                     warning("q Method of class Dirac produced NaNs.")
                   q0 <- ifelse((p < 0)|(p > 1), NaN, locationSub) 
                   return(q0)
                 },