[Distr-commits] r402 - branches/distr-2.1/pkg/distr/R branches/distr-2.1/pkg/distr/chm pkg/distr pkg/distr/R pkg/distr/man pkg/distrEx pkg/distrEx/R pkg/distrEx/man pkg/distrMod pkg/distrMod/man pkg/utils

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Thu Feb 19 22:56:44 CET 2009


Author: ruckdeschel
Date: 2009-02-19 22:56:44 +0100 (Thu, 19 Feb 2009)
New Revision: 402

Modified:
   branches/distr-2.1/pkg/distr/R/AllGenerics.R
   branches/distr-2.1/pkg/distr/chm/Distr.chm
   pkg/distr/DESCRIPTION
   pkg/distr/R/AllGenerics.R
   pkg/distr/man/0distr-package.Rd
   pkg/distrEx/DESCRIPTION
   pkg/distrEx/R/Functionals.R
   pkg/distrEx/R/Kurtosis.R
   pkg/distrEx/R/Skewness.R
   pkg/distrEx/man/0distrEx-package.Rd
   pkg/distrMod/DESCRIPTION
   pkg/distrMod/man/0distrMod-package.Rd
   pkg/utils/setNewVersion.r
   pkg/utils/updateTo203.R
Log:
fixed setGenerics- error reported by Kurt Hornik...
and fixed the NOTE messages in trunk

Modified: branches/distr-2.1/pkg/distr/R/AllGenerics.R
===================================================================
--- branches/distr-2.1/pkg/distr/R/AllGenerics.R	2009-02-19 21:24:32 UTC (rev 401)
+++ branches/distr-2.1/pkg/distr/R/AllGenerics.R	2009-02-19 21:56:44 UTC (rev 402)
@@ -92,6 +92,7 @@
 # Arithmetics
 ############################################################################
 
+if(getRversion()<'2.9.0'){
 if(!isGeneric("log")) 
     setGeneric("log", function(x, base) standardGeneric("log"), group = "Math")
 if(!isGeneric("log10")) 
@@ -100,10 +101,10 @@
     setGeneric("gamma", function(x) standardGeneric("gamma"), group = "Math")
 if(!isGeneric("lgamma")) 
     setGeneric("lgamma", function(x) standardGeneric("lgamma"), group = "Math")
+}
 
 
 
-
 ############################################################################
 # Access methods
 ############################################################################
@@ -307,6 +308,7 @@
 #### generics for log, log10, lgamma, gamma
 
 
+if(getRversion()<'2.9.0'){
 if(!isGeneric("log"))
    setGeneric("log") #, function(x, base) standardGeneric("log"))
 if(!isGeneric("log10"))
@@ -317,8 +319,8 @@
    setGeneric("gamma")
 if(!isGeneric("sign"))
    setGeneric("sign") #, function(x, base) standardGeneric("log"))
+}
 
-
 ### new Generics from 2.0 on (in particular for Mixing Distributions)
 
 # Accessor / Replacement Functions for UnivarMixingDistribution

Modified: branches/distr-2.1/pkg/distr/chm/Distr.chm
===================================================================
(Binary files differ)

Modified: pkg/distr/DESCRIPTION
===================================================================
--- pkg/distr/DESCRIPTION	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distr/DESCRIPTION	2009-02-19 21:56:44 UTC (rev 402)
@@ -1,6 +1,6 @@
 Package: distr
-Version: 2.0.5
-Date: 2009-01-20
+Version: 2.0.6
+Date: 2009-02-19
 Title: Object orientated implementation of distributions
 Description: Object orientated implementation of distributions
 Author: Florian Camphausen, Matthias Kohl, Peter Ruckdeschel, Thomas

Modified: pkg/distr/R/AllGenerics.R
===================================================================
--- pkg/distr/R/AllGenerics.R	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distr/R/AllGenerics.R	2009-02-19 21:56:44 UTC (rev 402)
@@ -92,6 +92,7 @@
 # Arithmetics
 ############################################################################
 
+if(getRversion()<'2.9.0'){
 if(!isGeneric("log")) 
     setGeneric("log", function(x, base) standardGeneric("log"), group = "Math")
 if(!isGeneric("log10")) 
@@ -100,10 +101,10 @@
     setGeneric("gamma", function(x) standardGeneric("gamma"), group = "Math")
 if(!isGeneric("lgamma")) 
     setGeneric("lgamma", function(x) standardGeneric("lgamma"), group = "Math")
+}
 
 
 
-
 ############################################################################
 # Access methods
 ############################################################################
@@ -307,6 +308,7 @@
 #### generics for log, log10, lgamma, gamma
 
 
+if(getRversion()<'2.9.0'){
 if(!isGeneric("log"))
    setGeneric("log") #, function(x, base) standardGeneric("log"))
 if(!isGeneric("log10"))
@@ -317,8 +319,8 @@
    setGeneric("gamma")
 if(!isGeneric("sign"))
    setGeneric("sign") #, function(x, base) standardGeneric("log"))
+}
 
-
 ### new Generics from 2.0 on (in particular for Mixing Distributions)
 
 # Accessor / Replacement Functions for UnivarMixingDistribution

Modified: pkg/distr/man/0distr-package.Rd
===================================================================
--- pkg/distr/man/0distr-package.Rd	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distr/man/0distr-package.Rd	2009-02-19 21:56:44 UTC (rev 402)
@@ -43,8 +43,8 @@
 \details{
 \tabular{ll}{
 Package: \tab distr\cr
-Version: \tab 2.0.5\cr
-Date: \tab 2009-01-20\cr
+Version: \tab 2.0.6 \cr
+Date: \tab 2009-02-19 \cr
 Depends: \tab R(>= 2.2.0), methods, graphics, startupmsg, sfsmisc,
 SweaveListingUtils\cr
 LazyLoad: \tab yes\cr

Modified: pkg/distrEx/DESCRIPTION
===================================================================
--- pkg/distrEx/DESCRIPTION	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distrEx/DESCRIPTION	2009-02-19 21:56:44 UTC (rev 402)
@@ -1,6 +1,6 @@
 Package: distrEx
-Version: 2.0.4
-Date: 2009-01-12
+Version: 2.0.5
+Date: 2009-02-19
 Title: Extensions of package distr
 Description: Extensions of package distr and some additional
         functionality

Modified: pkg/distrEx/R/Functionals.R
===================================================================
--- pkg/distrEx/R/Functionals.R	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distrEx/R/Functionals.R	2009-02-19 21:56:44 UTC (rev 402)
@@ -149,6 +149,7 @@
 #################################################################
 setMethod("var", signature(x = "Norm"),
     function(x,...){ 
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(var(as(x,"AbscontDistribution"),...))
     else
@@ -157,6 +158,7 @@
 
 setMethod("var", signature(x = "Binom"),
     function(x,...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
         return(var(as(x,"DiscreteDistribution"),...))
     else
@@ -165,6 +167,7 @@
 
 setMethod("var", signature(x = "Cauchy"),
     function(x,...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
       return(var(as(x,"AbscontDistribution"),...))
     else
@@ -173,6 +176,7 @@
 
 setMethod("var", signature(x = "Chisq"),
     function(x,...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(var(as(x,"AbscontDistribution"),...))
     else
@@ -185,6 +189,7 @@
 
 setMethod("var", signature(x = "DExp"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(var(as(x,"AbscontDistribution"),...))
     else
@@ -193,6 +198,7 @@
 
 setMethod("var", signature(x = "Exp"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(var(as(x,"AbscontDistribution"),...))
     else
@@ -202,6 +208,7 @@
 
 setMethod("var", signature(x = "Fd"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(var(as(x,"AbscontDistribution"),...))
     else
@@ -215,6 +222,7 @@
 
 setMethod("var", signature(x = "Gammad"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(var(as(x,"AbscontDistribution"),...))
     else
@@ -223,6 +231,7 @@
 
 setMethod("var", signature(x = "Geom"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(var(as(x,"DiscreteDistribution"),...))
     else {p <- prob(x); e <- 1/p-1; return(e+e^2)}
@@ -230,6 +239,7 @@
 
 setMethod("var", signature(x = "Hyper"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(var(as(x,"DiscreteDistribution"),...))
     else
@@ -241,6 +251,7 @@
 
 setMethod("var", signature(x = "Logis"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(var(as(x,"AbscontDistribution"),...))
     else
@@ -249,6 +260,7 @@
 
 setMethod("var", signature(x = "Lnorm"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(var(as(x,"AbscontDistribution"),...))
     else
@@ -257,6 +269,7 @@
 
 setMethod("var", signature(x = "Nbinom"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(var(as(x,"DiscreteDistribution"),...))
     else {p <- prob(x); e <- 1/p-1; return(size(x)*(e+e^2))}
@@ -264,6 +277,7 @@
 
 setMethod("var", signature(x = "Pois"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(var(as(x,"DiscreteDistribution"),...))
     else
@@ -272,6 +286,7 @@
 
 setMethod("var", signature(x = "Td"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(var(as(x,"AbscontDistribution"),...))
     else
@@ -285,6 +300,7 @@
 
 setMethod("var", signature(x = "Unif"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(var(as(x,"AbscontDistribution"),...))
     else
@@ -293,6 +309,7 @@
 
 setMethod("var", signature(x = "Weibull"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(var(as(x,"AbscontDistribution"),...))
     else
@@ -301,6 +318,7 @@
     
 setMethod("var", signature(x = "Beta"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))||(!isTRUE(all.equal(ncp(x),0)))) 
         return(var(as(x,"AbscontDistribution"),...))
     else

Modified: pkg/distrEx/R/Kurtosis.R
===================================================================
--- pkg/distrEx/R/Kurtosis.R	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distrEx/R/Kurtosis.R	2009-02-19 21:56:44 UTC (rev 402)
@@ -60,6 +60,7 @@
 ###
 setMethod("kurtosis", signature(x = "Norm"),
     function(x,...){ 
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -68,6 +69,7 @@
 #
 setMethod("kurtosis", signature(x = "Binom"),
     function(x,  ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(kurtosis(as(x,"DiscreteDistribution"),...))
     else
@@ -78,6 +80,7 @@
 #
 setMethod("kurtosis", signature(x = "Cauchy"),
     function(x,...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
       return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -86,6 +89,7 @@
 #
 setMethod("kurtosis", signature(x = "Chisq"),
     function(x,...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -98,6 +102,7 @@
 #
 setMethod("kurtosis", signature(x = "DExp"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -106,6 +111,7 @@
 #
 setMethod("kurtosis", signature(x = "Exp"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -115,6 +121,7 @@
 #
 setMethod("kurtosis", signature(x = "Fd"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) {
          return(kurtosis(as(x,"AbscontDistribution"),...))
     }else {
@@ -139,6 +146,7 @@
 #
 setMethod("kurtosis", signature(x = "Gammad"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -147,6 +155,7 @@
 #
 setMethod("kurtosis", signature(x = "Geom"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(kurtosis(as(x,"DiscreteDistribution"),...))
     else
@@ -155,6 +164,7 @@
 #
 setMethod("kurtosis", signature(x = "Hyper"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(kurtosis(as(x,"DiscreteDistribution"),...))
     else
@@ -171,6 +181,7 @@
 #
 setMethod("kurtosis", signature(x = "Logis"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -179,6 +190,7 @@
 #
 setMethod("kurtosis", signature(x = "Lnorm"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) {
         return(kurtosis(as(x,"AbscontDistribution"),...))
     } else {
@@ -189,6 +201,7 @@
 #
 setMethod("kurtosis", signature(x = "Nbinom"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(kurtosis(as(x,"DiscreteDistribution"),...))
     else
@@ -197,6 +210,7 @@
 #
 setMethod("kurtosis", signature(x = "Pois"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(kurtosis(as(x,"DiscreteDistribution"),...))
     else
@@ -205,6 +219,7 @@
 #
 setMethod("kurtosis", signature(x = "Td"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))){ 
         return(kurtosis(as(x,"AbscontDistribution"),...))
     } else {
@@ -224,6 +239,7 @@
 #
 setMethod("kurtosis", signature(x = "Unif"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -232,6 +248,7 @@
 #
 setMethod("kurtosis", signature(x = "Weibull"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(kurtosis(as(x,"AbscontDistribution"),...))
     else
@@ -245,6 +262,7 @@
 #    
 setMethod("kurtosis", signature(x = "Beta"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))||(!isTRUE(all.equal(ncp(x),0)))) 
         return(kurtosis(as(x,"AbscontDistribution"),...))
     else

Modified: pkg/distrEx/R/Skewness.R
===================================================================
--- pkg/distrEx/R/Skewness.R	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distrEx/R/Skewness.R	2009-02-19 21:56:44 UTC (rev 402)
@@ -51,6 +51,7 @@
 #
 setMethod("skewness", signature(x = "Norm"),
     function(x,...){ 
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -59,6 +60,7 @@
 #
 setMethod("skewness", signature(x = "Binom"),
     function(x,  ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(skewness(as(x,"DiscreteDistribution"),...))
     else
@@ -68,6 +70,7 @@
 #
 setMethod("skewness", signature(x = "Cauchy"),
     function(x,...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
       return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -76,6 +79,7 @@
 #
 setMethod("skewness", signature(x = "Chisq"),
     function(x,...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond)))
        return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -88,6 +92,7 @@
 #
 setMethod("skewness", signature(x = "DExp"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -96,6 +101,7 @@
 #
 setMethod("skewness", signature(x = "Exp"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -105,6 +111,7 @@
 #
 setMethod("skewness", signature(x = "Fd"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))){
          return(skewness(as(x,"AbscontDistribution"),...))
     }else {
@@ -126,6 +133,7 @@
 #
 setMethod("skewness", signature(x = "Gammad"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -134,6 +142,7 @@
 #
 setMethod("skewness", signature(x = "Geom"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(skewness(as(x,"DiscreteDistribution"),...))
     else
@@ -142,6 +151,7 @@
 #
 setMethod("skewness", signature(x = "Hyper"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(skewness(as(x,"DiscreteDistribution"),...))
     else
@@ -154,6 +164,7 @@
 #
 setMethod("skewness", signature(x = "Logis"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -162,6 +173,7 @@
 #
 setMethod("skewness", signature(x = "Lnorm"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) {
         return(skewness(as(x,"AbscontDistribution"),...))
     } else {
@@ -172,6 +184,7 @@
 #
 setMethod("skewness", signature(x = "Nbinom"),
     function(x, ...){    
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
          return(skewness(as(x,"DiscreteDistribution"),...))
     else
@@ -180,6 +193,7 @@
 #
 setMethod("skewness", signature(x = "Pois"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(skewness(as(x,"DiscreteDistribution"),...))
     else
@@ -188,6 +202,7 @@
 #
 setMethod("skewness", signature(x = "Td"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) {
         return(skewness(as(x,"AbscontDistribution"),...))
     } else {
@@ -206,6 +221,7 @@
 #
 setMethod("skewness", signature(x = "Unif"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -214,6 +230,7 @@
 #
 setMethod("skewness", signature(x = "Weibull"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))) 
         return(skewness(as(x,"AbscontDistribution"),...))
     else
@@ -225,6 +242,7 @@
 #    
 setMethod("skewness", signature(x = "Beta"),
     function(x, ...){
+    fun <- NULL; cond <- NULL
     if((hasArg(fun))||(hasArg(cond))||(!isTRUE(all.equal(ncp(x),0)))) 
         return(skewness(as(x,"AbscontDistribution"),...))
     else

Modified: pkg/distrEx/man/0distrEx-package.Rd
===================================================================
--- pkg/distrEx/man/0distrEx-package.Rd	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distrEx/man/0distrEx-package.Rd	2009-02-19 21:56:44 UTC (rev 402)
@@ -26,8 +26,8 @@
 \details{
 \tabular{ll}{
 Package: \tab distrEx\cr
-Version: \tab 2.0.4\cr
-Date: \tab 2009-01-12\cr
+Version: \tab 2.0.5 \cr
+Date: \tab 2009-02-19 \cr
 Depends: \tab R(>= 2.6.0), methods, distr(>= 2.0), evd, startupmsg\cr
 LazyLoad: \tab yes\cr
 License: \tab LGPL-3\cr

Modified: pkg/distrMod/DESCRIPTION
===================================================================
--- pkg/distrMod/DESCRIPTION	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distrMod/DESCRIPTION	2009-02-19 21:56:44 UTC (rev 402)
@@ -1,6 +1,6 @@
 Package: distrMod
-Version: 2.0.6
-Date: 2009-02-09
+Version: 2.0.7
+Date: 2009-02-19
 Title: Object orientated implementation of probability models
 Description: Object orientated implementation of probability models
         based on packages 'distr' and 'distrEx'

Modified: pkg/distrMod/man/0distrMod-package.Rd
===================================================================
--- pkg/distrMod/man/0distrMod-package.Rd	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/distrMod/man/0distrMod-package.Rd	2009-02-19 21:56:44 UTC (rev 402)
@@ -15,8 +15,8 @@
 \details{
 \tabular{ll}{
 Package: \tab distrMod\cr
-Version: \tab 2.0.6\cr
-Date: \tab 2009-02-09\cr
+Version: \tab 2.0.7 \cr
+Date: \tab 2009-02-19 \cr
 Depends: \tab R(>= 2.6.0), methods, startupmsg, distr(>= 2.0), distrEx(>=2.0), RandVar(>= 0.6.3), MASS, stats4\cr
 LazyLoad: \tab yes\cr
 License: \tab LGPL-3\cr

Modified: pkg/utils/setNewVersion.r
===================================================================
--- pkg/utils/setNewVersion.r	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/utils/setNewVersion.r	2009-02-19 21:56:44 UTC (rev 402)
@@ -29,7 +29,7 @@
               packs.HTML.dir = c("", paste(dev.dir, 
                      c(rep("distr/www",7),"robKalman/www"),
                                       sep=""),"",
-                     paste(dev.dir, c(rep("RobASt/www",6)), sep="")) 
+                     paste(dev.dir, c(rep("RobASt/www",6)), sep="")),
               rkurs = TRUE,
               rkursDir = "D:/Eigene Dateien/Arbeit/R-Kurs/"
                            )

Modified: pkg/utils/updateTo203.R
===================================================================
--- pkg/utils/updateTo203.R	2009-02-19 21:24:32 UTC (rev 401)
+++ pkg/utils/updateTo203.R	2009-02-19 21:56:44 UTC (rev 402)
@@ -17,11 +17,12 @@
                         "ROptRegTS"),
               packs.dir = paste(dev.dir, c(rep("distr/pkg",9),
                                rep("RobASt/pkg",6)), sep=""),
-              packs.ver = c("0.5.3", "0.1.1", rep("2.0.3",7),
+              packs.ver = c("0.5.3", "0.1.1", 
+                            "2.0.6", "2.0.3", "2.0.5",
                             "0.1.3","0.6.6","0.6.2",
                             "0.6.1", "0.6.1", "0.6.1"),
-              packs.gtR = c("1.8.0", "2.0.0", "2.2.0", "2.6.0", "2.6.0",
-                            "2.6.0", "2.6.0", "2.2.0", "2.6.0", "2.7.0",
+              packs.gtR = c("1.8.0", "2.0.0", "2.6.0", "2.6.0", "2.6.0",
+                            "2.6.0", "2.6.0", "2.6.0", "2.6.0", "2.7.0",
                             "2.7.0", "2.7.0", "2.7.0", "2.4.0", "2.4.0"),
               withHTML = FALSE,
               packs.HTML.dir = c("", "", paste(dev.dir,



More information about the Distr-commits mailing list