[Robast-commits] r30 - in pkg/RobAStBase: . R man

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

Author: stamats
Date: 2008-02-18 06:49:01 +0100 (Mon, 18 Feb 2008)
New Revision: 30

Modified:
   pkg/RobAStBase/DESCRIPTION
   pkg/RobAStBase/NAMESPACE
   pkg/RobAStBase/R/AllGeneric.R
   pkg/RobAStBase/man/infoPlot.Rd
Log:
RobAStBase checks and installs without any errors or warnings on R version 2.6.2 Patched (2008-02-10 r44423)

Modified: pkg/RobAStBase/DESCRIPTION
===================================================================
--- pkg/RobAStBase/DESCRIPTION	2008-02-18 05:48:14 UTC (rev 29)
+++ pkg/RobAStBase/DESCRIPTION	2008-02-18 05:49:01 UTC (rev 30)
@@ -1,6 +1,6 @@
 Package: RobAStBase
 Version: 0.1.0
-Date: 2008-02-13
+Date: 2008-02-18
 Title: Robust Asymptotic Statistics
 Description: Base S4-classes and functions for robust asymptotic statistics.
 Depends: R(>= 2.6.0), methods, distr(>= 2.0), distrEx(>= 2.0), distrMod(>= 2.0), RandVar(>= 0.6.2)

Modified: pkg/RobAStBase/NAMESPACE
===================================================================
--- pkg/RobAStBase/NAMESPACE	2008-02-18 05:48:14 UTC (rev 29)
+++ pkg/RobAStBase/NAMESPACE	2008-02-18 05:49:01 UTC (rev 30)
@@ -15,31 +15,12 @@
               "ContIC", 
               "TotalVarIC")
 exportMethods("show", 
-              "plot", 
-              "coerce", 
-              "length")
-exportMethods("type",
-              "SymmCenter")
+              "plot")
+exportMethods("type", "radius")
 exportMethods("name", "name<-", 
-              "distribution", 
-              "distrSymm",
-              "props", "props<-", "addProp<-", 
-              "main", "main<-", 
-              "nuisance", "nuisance<-", 
-              "trafo", "trafo<-", 
-              "param", 
-              "L2deriv", 
-              "L2derivSymm", 
-              "L2derivDistr", 
-              "L2derivDistrSymm", 
-              "FisherInfo", 
-              "checkL2deriv",
               "infoPlot")
-exportMethods("radius")
 exportMethods("center", "center<-", 
               "neighbor", "neighbor<-")
-exportMethods("bound", 
-              "width")
 exportMethods("Curve", 
               "Risks", "Risks<-", "addRisk<-", 
               "Infos", "Infos<-", "addInfo<-", 
@@ -53,12 +34,10 @@
               "lowerCase", "lowerCase<-", 
               "neighborRadius", "neighborRadius<-", 
               "clipLo", "clipLo<-", 
-              "clipUp", "clipUp<-") 
+              "clipUp", "clipUp<-",
+              "optIC") 
 exportMethods("oneStepEstimator", 
               "locMEstimator")
 export("ContNeighborhood", "TotalVarNeighborhood") 
 export("FixRobModel", "InfRobModel") 
-export("InfluenceCurve", 
-       "IC", 
-       "ContIC", 
-       "TotalVarIC")
+export("InfluenceCurve", "IC", "ContIC", "TotalVarIC")

Modified: pkg/RobAStBase/R/AllGeneric.R
===================================================================
--- pkg/RobAStBase/R/AllGeneric.R	2008-02-18 05:48:14 UTC (rev 29)
+++ pkg/RobAStBase/R/AllGeneric.R	2008-02-18 05:49:01 UTC (rev 30)
@@ -13,12 +13,6 @@
 if(!isGeneric("neighbor<-")){
     setGeneric("neighbor<-", function(object, value) standardGeneric("neighbor<-"))
 }
-if(!isGeneric("bound")){ 
-    setGeneric("bound", function(object) standardGeneric("bound"))
-}
-if(!isGeneric("width")){ 
-    setGeneric("width", function(object) standardGeneric("width"))
-}
 if(!isGeneric("Curve")){
     setGeneric("Curve", function(object) standardGeneric("Curve"))
 }
@@ -107,3 +101,6 @@
 if(!isGeneric("infoPlot")){
     setGeneric("infoPlot", function(object) standardGeneric("infoPlot"))
 }
+if(!isGeneric("optIC")){
+    setGeneric("optIC", function(model, risk, ...) standardGeneric("optIC"))
+}

Modified: pkg/RobAStBase/man/infoPlot.Rd
===================================================================
--- pkg/RobAStBase/man/infoPlot.Rd	2008-02-18 05:48:14 UTC (rev 29)
+++ pkg/RobAStBase/man/infoPlot.Rd	2008-02-18 05:49:01 UTC (rev 30)
@@ -28,7 +28,6 @@
 \seealso{\code{\link[distrMod]{L2ParamFamily-class}}, \code{\link{IC-class}}}
 \examples{
 N <- NormLocationScaleFamily(mean=0, sd=1) 
-## require(ROptEst)
 IC1 <- optIC(model = N, risk = asCov())
 infoPlot(IC1)
 }