[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