[Robast-commits] r169 - branches/robast-0.6/pkg/ROptEst/inst/scripts

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

Author: ruckdeschel
Date: 2008-08-28 10:23:52 +0200 (Thu, 28 Aug 2008)
New Revision: 169

Modified:
   branches/robast-0.6/pkg/ROptEst/inst/scripts/GammaModel.R
Log:
oops forgot to save first...

Modified: branches/robast-0.6/pkg/ROptEst/inst/scripts/GammaModel.R
===================================================================
--- branches/robast-0.6/pkg/ROptEst/inst/scripts/GammaModel.R	2008-08-28 08:23:16 UTC (rev 168)
+++ branches/robast-0.6/pkg/ROptEst/inst/scripts/GammaModel.R	2008-08-28 08:23:52 UTC (rev 169)
@@ -75,4 +75,4 @@
                      shape = estimate(est0)["shape"]), 
                 neighbor=ContNeighborhood(radius=0.5))
 IC9 <- optIC(model=RobG3, risk=asMSE())
-(est1 <- oneStepEstimator(x, IC=IC9, start=est0$estimate))
+(est1 <- oneStepEstimator(x, IC=IC9, start=estimate(est0)))