[Robast-commits] r1153 - branches/robast-1.2/pkg/RobExtremes/R

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

Author: ruckdeschel
Date: 2018-08-16 15:20:25 +0200 (Thu, 16 Aug 2018)
New Revision: 1153

Modified:
   branches/robast-1.2/pkg/RobExtremes/R/checkEstClassForParamFamiliyMethods.R
Log:
[RobExtremes] branch 1.2
+ Bernhard discovered a bug in ".checkEstClassForParamFamily" for GEV (was GPD instead of GEV)
+ there were no classes [GPD/GEV]MDEstimate -> fixed now

Modified: branches/robast-1.2/pkg/RobExtremes/R/checkEstClassForParamFamiliyMethods.R
===================================================================
--- branches/robast-1.2/pkg/RobExtremes/R/checkEstClassForParamFamiliyMethods.R	2018-08-16 12:07:23 UTC (rev 1152)
+++ branches/robast-1.2/pkg/RobExtremes/R/checkEstClassForParamFamiliyMethods.R	2018-08-16 13:20:25 UTC (rev 1153)
@@ -6,13 +6,6 @@
                  return(to)
 }
 
-setClass("GPDEstimate", contains="Estimate")
-setClass("GPDLDEstimate", contains=c("LDEstimate", "GPDEstimate"))
-setClass("GPDkStepEstimate", contains=c("kStepEstimate", "GPDEstimate"))
-setClass("GPDORobEstimate", contains=c("ORobEstimate", "GPDkStepEstimate"))
-setClass("GPDMCEstimate", contains=c("MCEstimate", "GPDEstimate"))
-setClass("GPDML.ALEstimate", contains=c("ML.ALEstimate", "GPDEstimate"))
-setClass("GPDCvMMD.ALEstimate", contains=c("CvMMD.ALEstimate", "GPDEstimate"))
 
 setMethod(".checkEstClassForParamFamily",
               signature=signature(PFam="GParetoFamily",estimator="Estimate"),
@@ -57,7 +50,7 @@
               function(PFam,estimator) .castToALE(PFam, estimator, "GEVML.ALEstimate"))
 setMethod(".checkEstClassForParamFamily",
               signature=signature(PFam="GEVFamily",estimator="CvMMDEstimate"),
-              function(PFam,estimator) .castToALE(PFam, estimator, "GPDCvMMD.ALEstimate"))
+              function(PFam,estimator) .castToALE(PFam, estimator, "GEVCvMMD.ALEstimate"))
 
 
 setMethod(".checkEstClassForParamFamily",
@@ -80,4 +73,4 @@
               function(PFam,estimator) .castToALE(PFam, estimator, "GEVML.ALEstimate"))
 setMethod(".checkEstClassForParamFamily",
               signature=signature(PFam="GEVFamilyMuUnknown",estimator="CvMMDEstimate"),
-              function(PFam,estimator) .castToALE(PFam, estimator, "GPDCvMMD.ALEstimate") )
+              function(PFam,estimator) .castToALE(PFam, estimator, "GEVCvMMD.ALEstimate") )