[Robast-commits] r353 - in branches/robast-0.7/pkg/RobAStBase: R chm

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

Author: ruckdeschel
Date: 2009-08-26 04:38:36 +0200 (Wed, 26 Aug 2009)
New Revision: 353

Modified:
   branches/robast-0.7/pkg/RobAStBase/R/oneStepEstimator.R
   branches/robast-0.7/pkg/RobAStBase/chm/RobAStBase.chm
Log:
and yet another buglet... arg(!)

Modified: branches/robast-0.7/pkg/RobAStBase/R/oneStepEstimator.R
===================================================================
--- branches/robast-0.7/pkg/RobAStBase/R/oneStepEstimator.R	2009-08-26 02:32:38 UTC (rev 352)
+++ branches/robast-0.7/pkg/RobAStBase/R/oneStepEstimator.R	2009-08-26 02:38:36 UTC (rev 353)
@@ -40,7 +40,7 @@
 
 
         res <- start.val + rowMeans(evalIC(IC, x0), na.rm = na.rm)
-        if(!is.null(dim(res))) nms <- colnames(res)
+        nms <- if(!is.null(dim(res))) colnames(res)  else names(start.val)
         dim(res) <- NULL
         if(is.null(names(res))) names(res) <- nms
         Infos <- matrix(c("oneStepEstimator", "1-step estimate"), ncol = 2)

Modified: branches/robast-0.7/pkg/RobAStBase/chm/RobAStBase.chm
===================================================================
(Binary files differ)