[Robast-commits] r140 - branches/robast-0.6/pkg/ROptEst/chm branches/robast-0.6/pkg/RandVar/chm branches/robast-0.6/pkg/RobAStBase/R branches/robast-0.6/pkg/RobAStBase/chm branches/robast-0.6/pkg/RobLox/R branches/robast-0.6/pkg/RobLox/chm pkg/ROptEst/chm pkg/RandVar/chm pkg/RobAStBase/chm pkg/RobLox/chm

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Sun Aug 3 06:02:38 CEST 2008


Author: ruckdeschel
Date: 2008-08-03 06:02:37 +0200 (Sun, 03 Aug 2008)
New Revision: 140

Modified:
   branches/robast-0.6/pkg/ROptEst/chm/00Index.html
   branches/robast-0.6/pkg/ROptEst/chm/ROptEst.chm
   branches/robast-0.6/pkg/ROptEst/chm/ROptEst.hhp
   branches/robast-0.6/pkg/ROptEst/chm/ROptEst.toc
   branches/robast-0.6/pkg/ROptEst/chm/getAsRisk.html
   branches/robast-0.6/pkg/ROptEst/chm/getBiasIC.html
   branches/robast-0.6/pkg/RandVar/chm/RandVar.chm
   branches/robast-0.6/pkg/RobAStBase/R/kStepEstimator.R
   branches/robast-0.6/pkg/RobAStBase/R/locMEstimator.R
   branches/robast-0.6/pkg/RobAStBase/R/oneStepEstimator.R
   branches/robast-0.6/pkg/RobAStBase/chm/00Index.html
   branches/robast-0.6/pkg/RobAStBase/chm/BdStWeight-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/BoundedWeight-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/ContIC-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/ContIC.html
   branches/robast-0.6/pkg/RobAStBase/chm/HampIC-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/HampelWeight-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/IC-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/IC.html
   branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.chm
   branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.hhp
   branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.toc
   branches/robast-0.6/pkg/RobAStBase/chm/RobAStControl-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/RobWeight-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC-class.html
   branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC.html
   branches/robast-0.6/pkg/RobAStBase/chm/locMEstimator.html
   branches/robast-0.6/pkg/RobAStBase/chm/makeIC-methods.html
   branches/robast-0.6/pkg/RobAStBase/chm/oneStepEstimator.html
   branches/robast-0.6/pkg/RobLox/R/roblox.R
   branches/robast-0.6/pkg/RobLox/chm/00Index.html
   branches/robast-0.6/pkg/RobLox/chm/RobLox.chm
   branches/robast-0.6/pkg/RobLox/chm/RobLox.toc
   branches/robast-0.6/pkg/RobLox/chm/rlOptIC.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AL.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An1.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An2.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AnMad.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.BM.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha3.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha4.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HaMad.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu1.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2a.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu3.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HuMad.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.M.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.MM2.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu1.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu2.html
   branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.TuMad.html
   branches/robast-0.6/pkg/RobLox/chm/roblox.html
   branches/robast-0.6/pkg/RobLox/chm/rowRoblox.html
   branches/robast-0.6/pkg/RobLox/chm/rsOptIC.html
   pkg/ROptEst/chm/ROptEst.chm
   pkg/RandVar/chm/RandVar.chm
   pkg/RobAStBase/chm/RobAStBase.chm
   pkg/RobLox/chm/RobLox.chm
Log:
-filled slot estimate.call in calls new("kStepEstimate",...), new("MEstimate",...)
and some chm/html files..

Modified: branches/robast-0.6/pkg/ROptEst/chm/00Index.html
===================================================================
--- branches/robast-0.6/pkg/ROptEst/chm/00Index.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/ROptEst/chm/00Index.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -286,6 +286,8 @@
 <td>Generic function for the computation of the radius minimax IC</td></tr>
 <tr><td width="25%"><a href="radiusMinimaxIC.html">radiusMinimaxIC-methods</a></td>
 <td>Generic function for the computation of the radius minimax IC</td></tr>
+<tr><td width="25%"><a href="roptest.html">roptest</a></td>
+<td>Optimally robust estimation </td></tr>
 </table>
 
 <h2><a name="U">-- U --</a></h2>

Modified: branches/robast-0.6/pkg/ROptEst/chm/ROptEst.chm
===================================================================
(Binary files differ)

Modified: branches/robast-0.6/pkg/ROptEst/chm/ROptEst.hhp
===================================================================
--- branches/robast-0.6/pkg/ROptEst/chm/ROptEst.hhp	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/ROptEst/chm/ROptEst.hhp	2008-08-03 04:02:37 UTC (rev 140)
@@ -33,4 +33,5 @@
 optIC.html
 optRisk.html
 radiusMinimaxIC.html
+roptest.html
 updateNorm-methods.html

Modified: branches/robast-0.6/pkg/ROptEst/chm/ROptEst.toc
===================================================================
--- branches/robast-0.6/pkg/ROptEst/chm/ROptEst.toc	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/ROptEst/chm/ROptEst.toc	2008-08-03 04:02:37 UTC (rev 140)
@@ -490,6 +490,10 @@
 <param name="Local" value="radiusMinimaxIC.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="roptest">
+<param name="Local" value="roptest.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="updateNorm">
 <param name="Local" value="updateNorm-methods.html">
 </OBJECT>
@@ -582,6 +586,10 @@
 <param name="Name" value="Methods for Function updateNorm in Package `ROptEst' ">
 <param name="Local" value="updateNorm-methods.html">
 </OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="Optimally robust estimation ">
+<param name="Local" value="roptest.html">
+</OBJECT>
 </UL>
 </UL>
 </BODY></HTML>

Modified: branches/robast-0.6/pkg/ROptEst/chm/getAsRisk.html
===================================================================
--- branches/robast-0.6/pkg/ROptEst/chm/getAsRisk.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/ROptEst/chm/getAsRisk.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -165,6 +165,14 @@
 object of class <code>"NormType"</code>. </td></tr>
 </table>
 
+<h3>Details</h3>
+
+<p>
+This function is rarely called directly. It is used by 
+other functions/methods.
+</p>
+
+
 <h3>Value</h3>
 
 <p>

Modified: branches/robast-0.6/pkg/ROptEst/chm/getBiasIC.html
===================================================================
--- branches/robast-0.6/pkg/ROptEst/chm/getBiasIC.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/ROptEst/chm/getBiasIC.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -49,6 +49,14 @@
 additional parameters </td></tr>
 </table>
 
+<h3>Details</h3>
+
+<p>
+This function is rarely called directly. It is used by 
+other functions/methods.
+</p>
+
+
 <h3>Value</h3>
 
 <p>

Modified: branches/robast-0.6/pkg/RandVar/chm/RandVar.chm
===================================================================
(Binary files differ)

Modified: branches/robast-0.6/pkg/RobAStBase/R/kStepEstimator.R
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/R/kStepEstimator.R	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/R/kStepEstimator.R	2008-08-03 04:02:37 UTC (rev 140)
@@ -5,6 +5,7 @@
                                       IC = "IC",
                                       start = "numeric"),
     function(x, IC, start, steps = 1L, useLast = getRobAStBaseOption("kStepUseLast")){
+        es.call <- match.call()
         if(!is.integer(steps))
           steps <- as.integer(steps)
         if(steps < 1)
@@ -64,6 +65,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = length(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = 1L, Infos = Infos))
@@ -113,6 +115,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = length(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = steps, Infos = Infos))
@@ -184,6 +187,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = ncol(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = 1L, Infos = Infos))
@@ -233,6 +237,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = ncol(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = steps, Infos = Infos))
@@ -302,6 +307,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = length(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = 1L, Infos = Infos))
@@ -351,6 +357,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = length(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = steps, Infos = Infos))
@@ -422,6 +429,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = ncol(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = 1L, Infos = Infos))
@@ -471,6 +479,7 @@
                 }
             }
             return(new("kStepEstimate", 
+                               estimate.call = es.call,
                        name = paste(steps, "-step estimate", sep = ""),
                        estimate = res, samplesize = ncol(x), asvar = asVar,
                        asbias = asBias, pIC = IC, steps = steps, Infos = Infos))

Modified: branches/robast-0.6/pkg/RobAStBase/R/locMEstimator.R
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/R/locMEstimator.R	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/R/locMEstimator.R	2008-08-03 04:02:37 UTC (rev 140)
@@ -3,6 +3,7 @@
 ###############################################################################
 setMethod("locMEstimator", signature(x = "numeric", IC = "InfluenceCurve"),
     function(x, IC, eps = .Machine$double.eps^0.5){
+    es.call <- match.call()
         if(numberOfMaps(IC at Curve) > 1)
             stop("number of Maps of 'IC' has to be 1")
 
@@ -25,8 +26,8 @@
             colnames(Infos) <- c("method", "message")
             asvar <- NULL
         }
-
         new("MEstimate", name = "Location M estimate", estimate = res$root, 
+                               estimate.call = es.call,
             pIC = IC, Mroot = res$f.root, Infos = Infos, samplesize = length(x),
             asvar = asVar, asbias = asBias)
     })

Modified: branches/robast-0.6/pkg/RobAStBase/R/oneStepEstimator.R
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/R/oneStepEstimator.R	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/R/oneStepEstimator.R	2008-08-03 04:02:37 UTC (rev 140)
@@ -5,6 +5,7 @@
                                         IC = "InfluenceCurve",
                                         start = "numeric"),
     function(x, IC, start, useLast = getRobAStBaseOption("kStepUseLast")){
+    es.call <- match.call()
         nrvalues <- dimension(IC at Curve)
         if(is.list(start)) start <- unlist(start)
         if(nrvalues != length(start))
@@ -65,6 +66,7 @@
         }
 
         new("kStepEstimate", name = "1-step estimate", estimate = res, 
+                               estimate.call = es.call,
             samplesize = length(x), asvar = asVar, asbias = asBias, pIC = IC, 
             steps = 1L, Infos = Infos)
     })
@@ -134,6 +136,7 @@
         }
 
         new("kStepEstimate", name = "1-step estimate", estimate = res, 
+                               estimate.call = es.call,
             samplesize = ncol(x), asvar = asVar, asbias = asBias, pIC = IC, steps = 1L, 
             Infos = Infos)
     })
@@ -202,6 +205,7 @@
         }
 
         new("kStepEstimate", name = "1-step estimate", estimate = res, 
+                               estimate.call = es.call,
             samplesize = length(x), asvar = asVar, asbias = asBias, pIC = IC, steps = 1L, 
             Infos = Infos)
     })
@@ -272,6 +276,7 @@
         }
 
         new("kStepEstimate", name = "1-step estimate", estimate = res, 
+                               estimate.call = es.call,
             samplesize = ncol(x), asvar = asVar, asbias = asBias, pIC = IC, steps = 1L, 
             Infos = Infos)
     })

Modified: branches/robast-0.6/pkg/RobAStBase/chm/00Index.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/00Index.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/00Index.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -22,6 +22,7 @@
 <a href="#G">G</a>
 <a href="#H">H</a>
 <a href="#I">I</a>
+<a href="#K">K</a>
 <a href="#L">L</a>
 <a href="#M">M</a>
 <a href="#N">N</a>
@@ -43,6 +44,12 @@
 <td>Influence curve</td></tr>
 <tr><td width="25%"><a href="InfluenceCurve-class.html">addRisk&lt;-,InfluenceCurve-method</a></td>
 <td>Influence curve</td></tr>
+<tr><td width="25%"><a href="ALEstimate-class.html">ALEstimate-class</a></td>
+<td>ALEstimate-class.</td></tr>
+<tr><td width="25%"><a href="ALEstimate-class.html">asbias</a></td>
+<td>ALEstimate-class.</td></tr>
+<tr><td width="25%"><a href="ALEstimate-class.html">asbias,ALEstimate-method</a></td>
+<td>ALEstimate-class.</td></tr>
 </table>
 
 <h2><a name="B">-- B --</a></h2>
@@ -207,6 +214,8 @@
 <td>Generic function for the computation of a risk for an IC</td></tr>
 <tr><td width="25%"><a href="getRiskIC.html">getRiskIC-methods</a></td>
 <td>Generic function for the computation of a risk for an IC</td></tr>
+<tr><td width="25%"><a href="RobAStBaseOptions.html">getRobAStBaseOption</a></td>
+<td>Function to change the global variables of the package &lsquo;RobAStBase&rsquo; </td></tr>
 <tr><td width="25%"><a href="getweight.html">getweight</a></td>
 <td>Generating weights</td></tr>
 <tr><td width="25%"><a href="getweight.html">getweight,BdStWeight,TotalVarNeighborhood,BiasType-method</a></td>
@@ -257,15 +266,36 @@
 <td>Robust model with infinitesimal (unconditional) neighborhood</td></tr>
 </table>
 
+<h2><a name="K">-- K --</a></h2>
+
+<table width="100%">
+<tr><td width="25%"><a href="kStepEstimate-class.html">kStepEstimate-class</a></td>
+<td>kStepEstimate-class.</td></tr>
+<tr><td width="25%"><a href="kStepEstimator.html">kStepEstimator</a></td>
+<td>Generic function for the computation of k-step estimates</td></tr>
+<tr><td width="25%"><a href="kStepEstimator.html">kStepEstimator,matrix,IC,Estimate-method</a></td>
+<td>Generic function for the computation of k-step estimates</td></tr>
+<tr><td width="25%"><a href="kStepEstimator.html">kStepEstimator,matrix,IC,numeric-method</a></td>
+<td>Generic function for the computation of k-step estimates</td></tr>
+<tr><td width="25%"><a href="kStepEstimator.html">kStepEstimator,numeric,IC,Estimate-method</a></td>
+<td>Generic function for the computation of k-step estimates</td></tr>
+<tr><td width="25%"><a href="kStepEstimator.html">kStepEstimator,numeric,IC,numeric-method</a></td>
+<td>Generic function for the computation of k-step estimates</td></tr>
+<tr><td width="25%"><a href="kStepEstimator.html">kStepEstimator-methods</a></td>
+<td>Generic function for the computation of k-step estimates</td></tr>
+<tr><td width="25%"><a href="RobAStBaseOptions.html">kStepUseLast</a></td>
+<td>Function to change the global variables of the package &lsquo;RobAStBase&rsquo; </td></tr>
+</table>
+
 <h2><a name="L">-- L --</a></h2>
 
 <table width="100%">
 <tr><td width="25%"><a href="locMEstimator.html">locMEstimator</a></td>
-<td>Generic function for the computation of location M estimators</td></tr>
+<td>Generic function for the computation of location M estimates</td></tr>
 <tr><td width="25%"><a href="locMEstimator.html">locMEstimator,numeric,InfluenceCurve-method</a></td>
-<td>Generic function for the computation of location M estimators</td></tr>
+<td>Generic function for the computation of location M estimates</td></tr>
 <tr><td width="25%"><a href="locMEstimator.html">locMEstimator-methods</a></td>
-<td>Generic function for the computation of location M estimators</td></tr>
+<td>Generic function for the computation of location M estimates</td></tr>
 <tr><td width="25%"><a href="HampIC-class.html">lowerCase</a></td>
 <td>Influence curve of Hampel type</td></tr>
 <tr><td width="25%"><a href="HampIC-class.html">lowerCase,HampIC-method</a></td>
@@ -289,6 +319,8 @@
 <td>Generic Function for making ICs consistent at a possibly different model</td></tr>
 <tr><td width="25%"><a href="InfluenceCurve-class.html">Map,InfluenceCurve-method</a></td>
 <td>Influence curve</td></tr>
+<tr><td width="25%"><a href="MEstimate-class.html">MEstimate-class</a></td>
+<td>MEstimate-class.</td></tr>
 <tr><td width="25%"><a href="getweight.html">minbiasweight</a></td>
 <td>Generating weights</td></tr>
 <tr><td width="25%"><a href="getweight.html">minbiasweight,BdStWeight,TotalVarNeighborhood,BiasType-method</a></td>
@@ -301,6 +333,14 @@
 <td>Generating weights</td></tr>
 <tr><td width="25%"><a href="getweight.html">minbiasweight-methods</a></td>
 <td>Generating weights</td></tr>
+<tr><td width="25%"><a href="IC-class.html">modifyIC</a></td>
+<td>Influence curve</td></tr>
+<tr><td width="25%"><a href="IC-class.html">modifyIC,IC-method</a></td>
+<td>Influence curve</td></tr>
+<tr><td width="25%"><a href="MEstimate-class.html">Mroot</a></td>
+<td>MEstimate-class.</td></tr>
+<tr><td width="25%"><a href="MEstimate-class.html">Mroot,MEstimate-method</a></td>
+<td>MEstimate-class.</td></tr>
 </table>
 
 <h2><a name="N">-- N --</a></h2>
@@ -322,8 +362,12 @@
 <td>Robust Weight classes</td></tr>
 <tr><td width="25%"><a href="RobModel-class.html">neighbor</a></td>
 <td>Robust model</td></tr>
+<tr><td width="25%"><a href="ContIC-class.html">neighbor,ContIC-method</a></td>
+<td>Influence curve of contamination type</td></tr>
 <tr><td width="25%"><a href="RobModel-class.html">neighbor,RobModel-method</a></td>
 <td>Robust model</td></tr>
+<tr><td width="25%"><a href="TotalVarIC-class.html">neighbor,TotalVarIC-method</a></td>
+<td>Influence curve of total variation type</td></tr>
 <tr><td width="25%"><a href="FixRobModel-class.html">neighbor&lt;-,FixRobModel-method</a></td>
 <td>Robust model with fixed (unconditional) neighborhood</td></tr>
 <tr><td width="25%"><a href="InfRobModel-class.html">neighbor&lt;-,InfRobModel-method</a></td>
@@ -346,17 +390,17 @@
 
 <table width="100%">
 <tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator</a></td>
-<td>Generic function for the computation of one-step estimators</td></tr>
-<tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator,matrix,InfluenceCurve,list-method</a></td>
-<td>Generic function for the computation of one-step estimators</td></tr>
+<td>Generic function for the computation of one-step estimates</td></tr>
+<tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator,matrix,InfluenceCurve,Estimate-method</a></td>
+<td>Generic function for the computation of one-step estimates</td></tr>
 <tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator,matrix,InfluenceCurve,numeric-method</a></td>
-<td>Generic function for the computation of one-step estimators</td></tr>
-<tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator,numeric,InfluenceCurve,list-method</a></td>
-<td>Generic function for the computation of one-step estimators</td></tr>
+<td>Generic function for the computation of one-step estimates</td></tr>
+<tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator,numeric,InfluenceCurve,Estimate-method</a></td>
+<td>Generic function for the computation of one-step estimates</td></tr>
 <tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator,numeric,InfluenceCurve,numeric-method</a></td>
-<td>Generic function for the computation of one-step estimators</td></tr>
+<td>Generic function for the computation of one-step estimates</td></tr>
 <tr><td width="25%"><a href="oneStepEstimator.html">oneStepEstimator-methods</a></td>
-<td>Generic function for the computation of one-step estimators</td></tr>
+<td>Generic function for the computation of one-step estimates</td></tr>
 <tr><td width="25%"><a href="optIC.html">optIC</a></td>
 <td>Generic function for the computation of optimally robust ICs</td></tr>
 <tr><td width="25%"><a href="optIC.html">optIC,L2ParamFamily,asCov-method</a></td>
@@ -368,6 +412,10 @@
 <h2><a name="P">-- P --</a></h2>
 
 <table width="100%">
+<tr><td width="25%"><a href="ALEstimate-class.html">pIC</a></td>
+<td>ALEstimate-class.</td></tr>
+<tr><td width="25%"><a href="ALEstimate-class.html">pIC,ALEstimate-method</a></td>
+<td>ALEstimate-class.</td></tr>
 <tr><td width="25%"><a href="IC-class.html">plot,IC-method</a></td>
 <td>Influence curve</td></tr>
 </table>
@@ -387,6 +435,8 @@
 <td>Influence curve</td></tr>
 <tr><td width="25%"><a href="InfluenceCurve-class.html">Risks&lt;-,InfluenceCurve-method</a></td>
 <td>Influence curve</td></tr>
+<tr><td width="25%"><a href="RobAStBaseOptions.html">RobAStBaseOptions</a></td>
+<td>Function to change the global variables of the package &lsquo;RobAStBase&rsquo; </td></tr>
 <tr><td width="25%"><a href="RobAStControl-class.html">RobAStControl-class</a></td>
 <td>Control classes in package RobAStBase</td></tr>
 <tr><td width="25%"><a href="RobModel-class.html">RobModel-class</a></td>
@@ -424,6 +474,10 @@
 <td>Influence curve of contamination type</td></tr>
 <tr><td width="25%"><a href="TotalVarIC-class.html">stand&lt;-,TotalVarIC-method</a></td>
 <td>Influence curve of total variation type</td></tr>
+<tr><td width="25%"><a href="kStepEstimate-class.html">steps</a></td>
+<td>kStepEstimate-class.</td></tr>
+<tr><td width="25%"><a href="kStepEstimate-class.html">steps,kStepEstimate-method</a></td>
+<td>kStepEstimate-class.</td></tr>
 </table>
 
 <h2><a name="T">-- T --</a></h2>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/BdStWeight-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/BdStWeight-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/BdStWeight-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -56,9 +56,10 @@
 
 
 <dt>stand&lt;-</dt><dd><code>signature(object = "BdStWeight", value = "matrix")</code>:
-replacement function for slot <code>stand</code>. </dd>
-
-<p>
+replacement function for slot <code>stand</code>. This replacement method 
+should be used with great care, as the slot <code>weight</code> is not
+simultaneously updated and hence, this may lead to inconsistent
+objects.</dd>
 </dl>
 
 <h3>Author(s)</h3>
@@ -91,7 +92,15 @@
 </p>
 
 
+<h3>Examples</h3>
 
+<pre>
+## prototype
+new("BdStWeight")
+</pre>
+
+
+
 <hr><div align="center">[Package <em>RobAStBase</em> version 0.1.0 <a href="00Index.html">Index]</a></div>
 
 </body></html>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/BoundedWeight-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/BoundedWeight-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/BoundedWeight-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -52,9 +52,10 @@
 
 
 <dt>clip&lt;-</dt><dd><code>signature(object = "BoundedWeight", value = "numeric")</code>:
-replacement function for slot <code>clip</code>. </dd>
-
-<p>
+replacement function for slot <code>clip</code>. This replacement method 
+should be used with great care, as the slot <code>weight</code> is not
+simultaneously updated and hence, this may lead to inconsistent
+objects. </dd>
 </dl>
 
 <h3>Author(s)</h3>
@@ -86,7 +87,15 @@
 </p>
 
 
+<h3>Examples</h3>
 
+<pre>
+## prototype
+new("BoundedWeight")
+</pre>
+
+
+
 <hr><div align="center">[Package <em>RobAStBase</em> version 0.1.0 <a href="00Index.html">Index]</a></div>
 
 </body></html>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/ContIC-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/ContIC-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/ContIC-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -19,6 +19,7 @@
 <param name="keyword" value="R:   lowerCase<-,ContIC-method">
 <param name="keyword" value="R:   stand<-">
 <param name="keyword" value="R:   stand<-,ContIC-method">
+<param name="keyword" value="R:   neighbor,ContIC-method">
 <param name="keyword" value="R:   generateIC,ContNeighborhood,L2ParamFamily-method">
 <param name="keyword" value="R:   show,ContIC-method">
 <param name="keyword" value=" Influence curve of contamination type">
@@ -64,6 +65,13 @@
 <dt><code>Curve</code>:</dt><dd>object of class <code>"EuclRandVarList"</code></dd>
 
 
+<dt><code>modifyIC</code>:</dt><dd>Object of class <code>"OptionalFunction"</code>:
+function of two arguments, which are an L2 parametric family 
+and an optional influence curve. Returns an object of 
+class <code>"IC"</code>. This slot is mainly used for internal
+computations! </dd>
+
+
 <dt><code>Risks</code>:</dt><dd>object of class <code>"list"</code>: 
 list of risks; cf. <code><a onclick="findlink('distrMod', 'RiskType-class.html')" style="text-decoration: underline; color: blue; cursor: hand">RiskType-class</a></code>. </dd>
 
@@ -87,8 +95,12 @@
 
 <dt><code>weight</code>:</dt><dd>object of class <code>"HampelWeight"</code>:
 weight function </dd>
+
+
 <dt><code>biastype</code>:</dt><dd>object of class <code>"BiasType"</code>:
 bias type (symmetric/onsided/asymmetric) </dd>
+
+
 <dt><code>normtype</code>:</dt><dd>object of class <code>"NormType"</code>:
 norm type (Euclidean, information/self-standardized)</dd>
 
@@ -142,6 +154,11 @@
 replacement function for slot <code>lowerCase</code>. </dd>
 
 
+<dt>neighbor</dt><dd><code>signature(object = "ContIC")</code>: 
+generates an object of class <code>"ContNeighborhood"</code> with
+radius given in slot <code>neighborRadius</code>. </dd>
+
+
 <dt>generateIC</dt><dd><code>signature(neighbor = "ContNeighborhood", L2Fam = "L2ParamFamily")</code>:
 generate an object of class <code>"ContIC"</code>. Rarely called directly. </dd>
 

Modified: branches/robast-0.6/pkg/RobAStBase/chm/ContIC.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/ContIC.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/ContIC.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -34,7 +34,8 @@
                                                 Domain = Reals())), 
        Risks, Infos, clip = Inf, cent = 0, stand = as.matrix(1), 
        lowerCase = NULL, neighborRadius = 0, w = new("HampelWeight"),
-       normtype = NormType(), biastype = symmetricBias())
+       normtype = NormType(), biastype = symmetricBias(),
+       modifyIC = NULL)
 </pre>
 
 
@@ -85,6 +86,13 @@
 <tr valign="top"><td><code>normtype</code></td>
 <td>
 NormType: type of the norm</td></tr>
+<tr valign="top"><td><code>modifyIC</code></td>
+<td>
+object of class <code>"OptionalFunction"</code>:
+function of two arguments, which are an L2 parametric family 
+and an optional influence curve. Returns an object of 
+class <code>"IC"</code>. This function is mainly used for internal
+computations! </td></tr>
 </table>
 
 <h3>Value</h3>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/HampIC-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/HampIC-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/HampIC-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -53,6 +53,13 @@
 <dt><code>Curve</code>:</dt><dd>object of class <code>"EuclRandVarList"</code></dd>
 
 
+<dt><code>modifyIC</code>:</dt><dd>Object of class <code>"OptionalFunction"</code>:
+function of two arguments, which are an L2 parametric family 
+and an optional influence curve. Returns an object of 
+class <code>"IC"</code>. This slot is mainly used for internal
+computations! </dd>
+
+
 <dt><code>Risks</code>:</dt><dd>object of class <code>"list"</code>:
 list of risks; cf. <code><a onclick="findlink('distrMod', 'RiskType-class.html')" style="text-decoration: underline; color: blue; cursor: hand">RiskType-class</a></code>. </dd>
 

Modified: branches/robast-0.6/pkg/RobAStBase/chm/HampelWeight-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/HampelWeight-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/HampelWeight-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -58,9 +58,10 @@
 
 
 <dt>cent&lt;-</dt><dd><code>signature(object = "HampelWeight", value = "matrix")</code>:
-replacement function for slot <code>cent</code>. </dd>
-
-<p>
+replacement function for slot <code>cent</code>. This replacement method 
+should be used with great care, as the slot <code>weight</code> is not
+simultaneously updated and hence, this may lead to inconsistent
+objects. </dd>
 </dl>
 
 <h3>Author(s)</h3>
@@ -94,7 +95,15 @@
 </p>
 
 
+<h3>Examples</h3>
 
+<pre>
+## prototype
+new("HampelWeight")
+</pre>
+
+
+
 <hr><div align="center">[Package <em>RobAStBase</em> version 0.1.0 <a href="00Index.html">Index]</a></div>
 
 </body></html>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/IC-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/IC-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/IC-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -10,6 +10,8 @@
 <param name="keyword" value="R:   CallL2Fam,IC-method">
 <param name="keyword" value="R:   CallL2Fam<-">
 <param name="keyword" value="R:   CallL2Fam<-,IC-method">
+<param name="keyword" value="R:   modifyIC">
+<param name="keyword" value="R:   modifyIC,IC-method">
 <param name="keyword" value="R:   checkIC,IC,missing-method">
 <param name="keyword" value="R:   checkIC,IC,L2ParamFamily-method">
 <param name="keyword" value="R:   evalIC,IC,numeric-method">
@@ -46,6 +48,11 @@
 <dt><code>CallL2Fam</code>:</dt><dd>Object of class <code>"call"</code>:
 creates an object of the underlying L2-differentiable 
 parametric family. </dd>
+<dt><code>modifyIC</code>:</dt><dd>Object of class <code>"OptionalFunction"</code>:
+function of two arguments, which are an L2 parametric family 
+and an optional influence curve. Returns an object of 
+class <code>"IC"</code>. This slot is mainly used for internal
+computations! </dd>
 <dt><code>name</code>:</dt><dd>Object of class <code>"character"</code>. </dd>
 <dt><code>Curve</code>:</dt><dd>Object of class <code>"EuclRandVarList"</code>.</dd>
 <dt><code>Risks</code>:</dt><dd>Object of class <code>"list"</code>: 
@@ -73,6 +80,10 @@
 replacement function for slot <code>CallL2Fam</code>. </dd>
 
 
+<dt>modifyIC</dt><dd><code>signature(object = "IC")</code>: 
+accessor function for slot <code>modifyIC</code>. </dd>
+
+
 <dt>checkIC</dt><dd><code>signature(IC = "IC", L2Fam = "missing")</code>: 
 check centering and Fisher consistency of <code>IC</code> assuming
 the L2-differentiable parametric family which can 

Modified: branches/robast-0.6/pkg/RobAStBase/chm/IC.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/IC.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/IC.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -25,7 +25,7 @@
 <pre>
 IC(name, Curve = EuclRandVarList(RealRandVariable(Map = list(function(x){x}), 
                                         Domain = Reals())), 
-   Risks, Infos, CallL2Fam = call("L2ParamFamily"))
+   Risks, Infos, CallL2Fam = call("L2ParamFamily"), modifyIC = NULL)
 </pre>
 
 
@@ -51,6 +51,13 @@
 <td>
 matrix of characters with two columns 
 named <code>method</code> and <code>message</code>: additional informations. </td></tr>
+<tr valign="top"><td><code>modifyIC</code></td>
+<td>
+Object of class <code>"OptionalFunction"</code>:
+function of two arguments, which are an L2 parametric family 
+and an optional influence curve. Returns an object of 
+class <code>"IC"</code>. This function is mainly used for internal
+computations! </td></tr>
 </table>
 
 <h3>Value</h3>
@@ -92,20 +99,6 @@
 <pre>
 IC1 &lt;- IC()
 plot(IC1)
-
-## The function is currently defined as
-IC &lt;- function(name, Curve = EuclRandVarList(RealRandVariable(Map = list(function(x){x})), 
-               Domain = Reals()), Risks, Infos, CallL2Fam = call("L2ParamFamily")){
-    if(missing(name))
-        name &lt;- "square integrable (partial) influence curve"
-    if(missing(Risks))
-        Risks &lt;- list()
-    if(missing(Infos))
-        Infos &lt;- matrix(c(character(0),character(0)), ncol=2,
-                     dimnames=list(character(0), c("method", "message")))
-    return(new("IC", name = name, Curve = Curve, Risks = Risks,
-               Infos = Infos, CallL2Fam = CallL2Fam))
-}
 </pre>
 
 <script Language="JScript">

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

Modified: branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.hhp
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.hhp	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.hhp	2008-08-03 04:02:37 UTC (rev 140)
@@ -12,6 +12,7 @@
 
 [FILES]
 00Index.html
+ALEstimate-class.html
 BdStWeight-class.html
 BoundedWeight-class.html
 ContIC-class.html
@@ -28,7 +29,9 @@
 InfRobModel.html
 InfluenceCurve-class.html
 InfluenceCurve.html
+MEstimate-class.html
 Neighborhood-class.html
+RobAStBaseOptions.html
 RobAStControl-class.html
 RobModel-class.html
 RobWeight-class.html
@@ -47,6 +50,8 @@
 getweight.html
 infoPlot.html
 internals.html
+kStepEstimate-class.html
+kStepEstimator.html
 locMEstimator.html
 makeIC-methods.html
 oneStepEstimator.html

Modified: branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.toc
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.toc	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/RobAStBase.toc	2008-08-03 04:02:37 UTC (rev 140)
@@ -34,6 +34,18 @@
 <param name="Local" value="InfluenceCurve-class.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="ALEstimate-class">
+<param name="Local" value="ALEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="asbias">
+<param name="Local" value="ALEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="asbias,ALEstimate-method">
+<param name="Local" value="ALEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="BdStWeight-class">
 <param name="Local" value="BdStWeight-class.html">
 </OBJECT>
@@ -326,6 +338,10 @@
 <param name="Local" value="getRiskIC.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="getRobAStBaseOption">
+<param name="Local" value="RobAStBaseOptions.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="getweight">
 <param name="Local" value="getweight.html">
 </OBJECT>
@@ -410,6 +426,38 @@
 <param name="Local" value="internals.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimate-class">
+<param name="Local" value="kStepEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimator">
+<param name="Local" value="kStepEstimator.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimator,matrix,IC,Estimate-method">
+<param name="Local" value="kStepEstimator.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimator,matrix,IC,numeric-method">
+<param name="Local" value="kStepEstimator.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimator,numeric,IC,Estimate-method">
+<param name="Local" value="kStepEstimator.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimator,numeric,IC,numeric-method">
+<param name="Local" value="kStepEstimator.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimator-methods">
+<param name="Local" value="kStepEstimator.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepUseLast">
+<param name="Local" value="RobAStBaseOptions.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="locMEstimator">
 <param name="Local" value="locMEstimator.html">
 </OBJECT>
@@ -462,6 +510,10 @@
 <param name="Local" value="InfluenceCurve-class.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="MEstimate-class">
+<param name="Local" value="MEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="minbiasweight">
 <param name="Local" value="getweight.html">
 </OBJECT>
@@ -486,6 +538,22 @@
 <param name="Local" value="getweight.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="modifyIC">
+<param name="Local" value="IC-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="modifyIC,IC-method">
+<param name="Local" value="IC-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="Mroot">
+<param name="Local" value="MEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="Mroot,MEstimate-method">
+<param name="Local" value="MEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="name,InfluenceCurve-method">
 <param name="Local" value="InfluenceCurve-class.html">
 </OBJECT>
@@ -518,10 +586,18 @@
 <param name="Local" value="RobModel-class.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="neighbor,ContIC-method">
+<param name="Local" value="ContIC-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="neighbor,RobModel-method">
 <param name="Local" value="RobModel-class.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="neighbor,TotalVarIC-method">
+<param name="Local" value="TotalVarIC-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="neighbor<-">
 <param name="Local" value="RobModel-class.html">
 </OBJECT>
@@ -566,7 +642,7 @@
 <param name="Local" value="oneStepEstimator.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
-<param name="Name" value="oneStepEstimator,matrix,InfluenceCurve,list-method">
+<param name="Name" value="oneStepEstimator,matrix,InfluenceCurve,Estimate-method">
 <param name="Local" value="oneStepEstimator.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
@@ -574,7 +650,7 @@
 <param name="Local" value="oneStepEstimator.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
-<param name="Name" value="oneStepEstimator,numeric,InfluenceCurve,list-method">
+<param name="Name" value="oneStepEstimator,numeric,InfluenceCurve,Estimate-method">
 <param name="Local" value="oneStepEstimator.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
@@ -598,6 +674,14 @@
 <param name="Local" value="optIC.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="pIC">
+<param name="Local" value="ALEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="pIC,ALEstimate-method">
+<param name="Local" value="ALEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="plot,IC-method">
 <param name="Local" value="IC-class.html">
 </OBJECT>
@@ -630,6 +714,10 @@
 <param name="Local" value="InfluenceCurve-class.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="RobAStBaseOptions">
+<param name="Local" value="RobAStBaseOptions.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="RobAStControl-class">
 <param name="Local" value="RobAStControl-class.html">
 </OBJECT>
@@ -698,6 +786,14 @@
 <param name="Local" value="TotalVarIC-class.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="steps">
+<param name="Local" value="kStepEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="steps,kStepEstimate-method">
+<param name="Local" value="kStepEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="TotalVarIC">
 <param name="Local" value="TotalVarIC.html">
 </OBJECT>
@@ -751,6 +847,10 @@
 </OBJECT>
 <UL>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="ALEstimate-class.">
+<param name="Local" value="ALEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="Compare - Plots">
 <param name="Local" value="comparePlot.html">
 </OBJECT>
@@ -763,6 +863,10 @@
 <param name="Local" value="RobAStControl-class.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="Function to change the global variables of the package `RobAStBase' ">
+<param name="Local" value="RobAStBaseOptions.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="Generating function for ContIC-class">
 <param name="Local" value="ContIC.html">
 </OBJECT>
@@ -815,11 +919,15 @@
 <param name="Local" value="getRiskIC.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
-<param name="Name" value="Generic function for the computation of location M estimators">
+<param name="Name" value="Generic function for the computation of k-step estimates">
+<param name="Local" value="kStepEstimator.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="Generic function for the computation of location M estimates">
 <param name="Local" value="locMEstimator.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
-<param name="Name" value="Generic function for the computation of one-step estimators">
+<param name="Name" value="Generic function for the computation of one-step estimates">
 <param name="Local" value="oneStepEstimator.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
@@ -855,6 +963,14 @@
 <param name="Local" value="internals.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
+<param name="Name" value="kStepEstimate-class.">
+<param name="Local" value="kStepEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="MEstimate-class.">
+<param name="Local" value="MEstimate-class.html">
+</OBJECT>
+<LI> <OBJECT type="text/sitemap">
 <param name="Name" value="Neighborhood">
 <param name="Local" value="Neighborhood-class.html">
 </OBJECT>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/RobAStControl-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/RobAStControl-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/RobAStControl-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -22,6 +22,20 @@
 </p>
 
 
+<h3>Objects from the Class</h3>
+
+<p>
+This class is virtual; that is no objects may be created.
+</p>
+
+
+<h3>Slots</h3>
+
+<dl>
+<dt><code>name</code>:</dt><dd>Object of class <code>"character"</code>:
+name of the control object. </dd>
+</dl>
+
 <h3>Methods</h3>
 
 <dl>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/RobWeight-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/RobWeight-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/RobWeight-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -8,11 +8,11 @@
 <param name="keyword" value="R:   RobWeight-class">
 <param name="keyword" value="R:   name,RobWeight-method">
 <param name="keyword" value="R:   name<-,RobWeight-method">
+<param name="keyword" value="R:   weight">
 <param name="keyword" value="R:   weight,RobWeight-method">
-<param name="keyword" value="R:   weight">
+<param name="keyword" value="R:   weight<-">
 <param name="keyword" value="R:   weight<--methods">
 <param name="keyword" value="R:   weight<-,RobWeight-method">
-<param name="keyword" value="R:   weight<-">
 <param name="keyword" value=" Robust Weight classes">
 </object>
 
@@ -48,7 +48,7 @@
 accessor function for slot <code>name</code>. </dd>
 
 
-<dt>name&lt;-</dt><dd><code>signature(object = "RobWeight", value = "character")</code>: 
+<dt>name&lt;-</dt><dd><code>signature(object = "RobWeight")</code>: 
 replacement function for slot <code>name</code>. </dd>
 
 
@@ -56,7 +56,7 @@
 accessor function for slot <code>weight</code>. </dd>
 
 
-<dt>weight&lt;-</dt><dd><code>signature(object = "RobWeight", value = "ANY")</code>: 
+<dt>weight&lt;-</dt><dd><code>signature(object = "RobWeight")</code>: 
 replacement function for slot <code>weight</code>. </dd>
 </dl>
 
@@ -89,7 +89,15 @@
 </p>
 
 
+<h3>Examples</h3>
 
+<pre>
+## prototype
+new("RobWeight")
+</pre>
+
+
+
 <hr><div align="center">[Package <em>RobAStBase</em> version 0.1.0 <a href="00Index.html">Index]</a></div>
 
 </body></html>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC-class.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC-class.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC-class.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -16,6 +16,7 @@
 <param name="keyword" value="R:   clipUp<-">
 <param name="keyword" value="R:   clipUp<-,TotalVarIC-method">
 <param name="keyword" value="R:   lowerCase<-,TotalVarIC-method">
+<param name="keyword" value="R:   neighbor,TotalVarIC-method">
 <param name="keyword" value="R:   show,TotalVarIC-method">
 <param name="keyword" value="R:   stand<-,TotalVarIC-method">
 <param name="keyword" value="R:   generateIC,TotalVarNeighborhood,L2ParamFamily-method">
@@ -62,6 +63,13 @@
 <dt><code>Curve</code>:</dt><dd>object of class <code>"EuclRandVarList"</code>.</dd>
 
 
+<dt><code>modifyIC</code>:</dt><dd>Object of class <code>"OptionalFunction"</code>:
+function of two arguments, which are an L2 parametric family 
+and an optional influence curve. Returns an object of 
+class <code>"IC"</code>. This slot is mainly used for internal
+computations! </dd>
+
+
 <dt><code>Risks</code>:</dt><dd>object of class <code>"list"</code>: 
 list of risks; cf. <code><a onclick="findlink('distrMod', 'RiskType-class.html')" style="text-decoration: underline; color: blue; cursor: hand">RiskType-class</a></code>. </dd>
 
@@ -87,6 +95,14 @@
 weight function </dd>
 
 
+<dt><code>biastype</code>:</dt><dd>object of class <code>"BiasType"</code>:
+bias type (symmetric/onsided/asymmetric) </dd>
+
+
+<dt><code>normtype</code>:</dt><dd>object of class <code>"NormType"</code>:
+norm type (Euclidean, information/self-standardized)</dd>
+
+
 <dt><code>neighborRadius</code>:</dt><dd>object of class <code>"numeric"</code>:
 radius of the corresponding (unconditional) contamination 
 neighborhood. </dd>
@@ -128,6 +144,15 @@
 replacement function for slot <code>stand</code>. </dd>
 
 
+<dt>lowerCase&lt;-</dt><dd><code>signature(object = "TotalVarIC")</code>:
+replacement function for slot <code>lowerCase</code>. </dd>
+
+
+<dt>neighbor</dt><dd><code>signature(object = "TotalVarIC")</code>: 
+generates an object of class <code>"TotalVarNeighborhood"</code> with
+radius given in slot <code>neighborRadius</code>. </dd>
+
+
 <dt>generateIC</dt><dd><code>signature(neighbor = "TotalVarNeighborhood", L2Fam = "L2ParamFamily")</code>:
 generate an object of class <code>"TotalVarIC"</code>. Rarely called directly. </dd>
 

Modified: branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/TotalVarIC.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -33,7 +33,9 @@
            Curve = EuclRandVarList(RealRandVariable(Map = c(function(x) {x}), 
                                                     Domain = Reals())), 
            Risks, Infos, clipLo = -Inf, clipUp = Inf, stand = as.matrix(1), 
-           lowerCase = NULL, neighborRadius = 0, w = new("BdStWeight"))
+           lowerCase = NULL, neighborRadius = 0, w = new("BdStWeight"),
+           normtype = NormType(), biastype = symmetricBias(),
+           modifyIC = NULL)
 </pre>
 
 
@@ -78,6 +80,19 @@
 <td>
 radius of the corresponding (unconditional) 
 contamination neighborhood. </td></tr>
+<tr valign="top"><td><code>biastype</code></td>
+<td>
+BiasType: type of the bias</td></tr>
+<tr valign="top"><td><code>normtype</code></td>
+<td>
+NormType: type of the norm</td></tr>
+<tr valign="top"><td><code>modifyIC</code></td>
+<td>
+object of class <code>"OptionalFunction"</code>:
+function of two arguments, which are an L2 parametric family 
+and an optional influence curve. Returns an object of 
+class <code>"IC"</code>. This function is mainly used for internal
+computations! </td></tr>
 </table>
 
 <h3>Value</h3>

Modified: branches/robast-0.6/pkg/RobAStBase/chm/locMEstimator.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/locMEstimator.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/locMEstimator.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -1,4 +1,4 @@
-<html><head><title>Generic function for the computation of location M estimators</title>
+<html><head><title>Generic function for the computation of location M estimates</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" type="text/css" href="Rchm.css">
 </head>
@@ -8,17 +8,17 @@
 <param name="keyword" value="R:   locMEstimator">
 <param name="keyword" value="R:   locMEstimator-methods">
 <param name="keyword" value="R:   locMEstimator,numeric,InfluenceCurve-method">
-<param name="keyword" value=" Generic function for the computation of location M estimators">
+<param name="keyword" value=" Generic function for the computation of location M estimates">
 </object>
 
 
-<h2>Generic function for the computation of location M estimators</h2>
+<h2>Generic function for the computation of location M estimates</h2>
 
 
 <h3>Description</h3>
 
 <p>
-Generic function for the computation of location M estimators.
+Generic function for the computation of location M estimates.
 </p>
 
 
@@ -49,17 +49,20 @@
 the desired accuracy (convergence tolerance). </td></tr>
 </table>
 
-<h3>Value</h3>
+<h3>Details</h3>
 
 <p>
-Returns a list with component
+Given some sample <code>x</code> and some influence curve <code>IC</code>
+an M estimate is computed by solving the corresponding 
+M equation.
 </p>
-<table summary="R argblock">
-<tr valign="top"><td><code>loc</code></td>
-<td>
-M estimator of location </td></tr>
-</table>
 
+
+<h3>Value</h3>
+
+<p>
+Object of class <code>"MEstimate"</code></p>
+
 <h3>Methods</h3>
 
 <dl>
@@ -91,7 +94,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a href="InfluenceCurve-class.html">InfluenceCurve-class</a></code>
+<code><a href="InfluenceCurve-class.html">InfluenceCurve-class</a></code>, <code><a href="MEstimate-class.html">MEstimate-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobAStBase/chm/makeIC-methods.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/makeIC-methods.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/makeIC-methods.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -84,9 +84,26 @@
 <h3>Examples</h3>
 
 <pre>
+## default IC
 IC1 &lt;- new("IC")
+
+## L2-differentiable parametric family
 B &lt;- BinomFamily(13, 0.3)
-makeIC(IC1,B)
+
+## check IC properties
+checkIC(IC1, B)
+
+## make IC
+IC2 &lt;- makeIC(IC1, B)
+
+## check IC properties
+checkIC(IC2)
+
+## slot modifyIC is filled in case of IC2
+IC3 &lt;- modifyIC(IC2)(BinomFamily(13, 0.2), IC2)
+checkIC(IC3)
+## identical to
+checkIC(IC3, BinomFamily(13, 0.2))
 </pre>
 
 <script Language="JScript">

Modified: branches/robast-0.6/pkg/RobAStBase/chm/oneStepEstimator.html
===================================================================
--- branches/robast-0.6/pkg/RobAStBase/chm/oneStepEstimator.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobAStBase/chm/oneStepEstimator.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -1,4 +1,4 @@
-<html><head><title>Generic function for the computation of one-step estimators</title>
+<html><head><title>Generic function for the computation of one-step estimates</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" type="text/css" href="Rchm.css">
 </head>
@@ -8,27 +8,44 @@
 <param name="keyword" value="R:   oneStepEstimator">
 <param name="keyword" value="R:   oneStepEstimator-methods">
 <param name="keyword" value="R:   oneStepEstimator,numeric,InfluenceCurve,numeric-method">
-<param name="keyword" value="R:   oneStepEstimator,numeric,InfluenceCurve,list-method">
 <param name="keyword" value="R:   oneStepEstimator,matrix,InfluenceCurve,numeric-method">
-<param name="keyword" value="R:   oneStepEstimator,matrix,InfluenceCurve,list-method">
-<param name="keyword" value=" Generic function for the computation of one-step estimators">
+<param name="keyword" value="R:   oneStepEstimator,numeric,InfluenceCurve,Estimate-method">
+<param name="keyword" value="R:   oneStepEstimator,matrix,InfluenceCurve,Estimate-method">
+<param name="keyword" value=" Generic function for the computation of one-step estimates">
 </object>
 
 
-<h2>Generic function for the computation of one-step estimators</h2>
+<h2>Generic function for the computation of one-step estimates</h2>
 
 
 <h3>Description</h3>
 
 <p>
-Generic function for the computation of one-step estimators.
+Generic function for the computation of one-step estimates.
 </p>
 
 
 <h3>Usage</h3>
 
 <pre>
-oneStepEstimator(x, IC, start)
+oneStepEstimator(x, IC, start, ...)
+
+## S4 method for signature 'numeric, InfluenceCurve,
+##   numeric':
+oneStepEstimator(x, IC, start, 
+    useLast = getRobAStBaseOption("kStepUseLast"))
+## S4 method for signature 'matrix, InfluenceCurve,
+##   numeric':
+oneStepEstimator(x, IC, start, 
+    useLast = getRobAStBaseOption("kStepUseLast"))
+## S4 method for signature 'numeric, InfluenceCurve,
+##   Estimate':
+oneStepEstimator(x, IC, start, 
+    useLast = getRobAStBaseOption("kStepUseLast"))
+## S4 method for signature 'matrix, InfluenceCurve,
+##   Estimate':
+oneStepEstimator(x, IC, start, 
+    useLast = getRobAStBaseOption("kStepUseLast"))
 </pre>
 
 
@@ -44,6 +61,14 @@
 <tr valign="top"><td><code>start</code></td>
 <td>
 initial estimate </td></tr>
+<tr valign="top"><td><code>useLast</code></td>
+<td>
+which parameter estimate (initial estimate or
+one-step estimate) shall be used to fill the slots <code>pIC</code>,
+<code>asvar</code> and <code>asbias</code> of the return value. </td></tr>
+<tr valign="top"><td><code>...</code></td>
+<td>
+additional arguments </td></tr>
 </table>
 
 <h3>Details</h3>
@@ -51,22 +76,47 @@
 <p>
 Given an initial estimation <code>start</code>, a sample <code>x</code> 
 and an influence curve <code>IC</code> the corresponding one-step
-estimator is computed
+estimator is computed.
 </p>
+<p>
+In case <code>IC</code> is an object of class <code>"IC"</code>
+the slots <code>asvar</code> and <code>asbias</code> of the return 
+value are filled (based on the initial estimate).
+</p>
+<p>
+The default value of argument <code>useLast</code> is set by the
+global option <code>kStepUseLast</code> which by default is set to 
+<code>FALSE</code>. In case of general models <code>useLast</code> 
+remains unchanged during the computations. However, if 
+slot <code>CallL2Fam</code> of <code>IC</code> generates an object of 
+class <code>"L2GroupParamFamily"</code> the value of <code>useLast</code> 
+is changed to <code>TRUE</code>.
+Explicitly setting <code>useLast</code> to <code>TRUE</code> should
+be done with care as in this situation the influence curve
+is re-computed using the value of the one-step estimate
+which may take quite a long time depending on the model.
+</p>
+<p>
+If <code>useLast</code> is set to <code>TRUE</code> and slot <code>modifyIC</code> 
+of <code>IC</code> is filled with some function (which can be 
+used to re-compute the IC for a different parameter), the 
+computation of <code>asvar</code>, <code>asbias</code> and <code>IC</code> is 
+based on the one-step estimate.
+</p>
 
 
 <h3>Value</h3>
 
 <p>
-The one-step estimation is computed.</p>
+Object of class <code>"kStepEstimate"</code></p>
 
 <h3>Methods</h3>
 
 <dl>
 <dt>x = "numeric", IC = "InfluenceCurve", start = "numeric"</dt><dd>univariate samples. </dd>
-<dt>x = "numeric", IC = "InfluenceCurve", start = "list"</dt><dd>univariate samples. </dd>
 <dt>x = "matrix", IC = "InfluenceCurve", start = "numeric"</dt><dd>multivariate samples. </dd>
-<dt>x = "matrix", IC = "InfluenceCurve", start = "list"</dt><dd>multivariate samples. </dd>
+<dt>x = "matrix", IC = "InfluenceCurve", start = "Estimate"</dt><dd>multivariate samples. </dd>
+<dt>x = "matrix", IC = "InfluenceCurve", start = "Estimate"</dt><dd>multivariate samples. </dd>
 </dl>
 
 <h3>Author(s)</h3>
@@ -90,7 +140,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a href="InfluenceCurve-class.html">InfluenceCurve-class</a></code>
+<code><a href="InfluenceCurve-class.html">InfluenceCurve-class</a></code>, <code><a href="kStepEstimate-class.html">kStepEstimate-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/R/roblox.R
===================================================================
--- branches/robast-0.6/pkg/RobLox/R/roblox.R	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/R/roblox.R	2008-08-03 04:02:37 UTC (rev 140)
@@ -167,6 +167,7 @@
 ###############################################################################
 roblox <- function(x, mean, sd, eps, eps.lower, eps.upper, initial.est, k = 1, 
                    returnIC = FALSE){
+    es.call <- match.call()
     if(missing(x))
         stop("'x' is missing with no default")
     if(!is.numeric(x)){
@@ -308,10 +309,12 @@
                                       w = w, biastype = symmetricBias(), normtype = NormType(),
                                       modifyIC = modIC))
                 return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                            estimate = robEst$est, samplesize = length(x), asvar = robEst$asvar,
                            asbias = r*robEst$b, steps = k, pIC = IC1, Infos = Info.matrix))
             }else
                 return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                            estimate = robEst$est, samplesize = length(x), asvar = robEst$asvar,
                            asbias = r*robEst$b, steps = k, pIC = NULL, Infos = Info.matrix))
         }else{
@@ -420,10 +423,12 @@
                                       paste("maximum MSE-inefficiency: ", round(ineff, 3), sep = "")), 
                                       ncol = 2, dimnames = list(NULL, c("method", "message")))
                 return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                            estimate = robEst$est, samplesize = length(x), asvar = robEst$asvar,
                            asbias = r*robEst$b, steps = k, pIC = IC1, Infos = Info.matrix))
             }else
                 return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                            estimate = robEst$est, samplesize = length(x), asvar = robEst$asvar,
                            asbias = r*robEst$b, steps = k, pIC = NULL, Infos = Info.matrix))
         }
@@ -483,11 +488,13 @@
                                           w = w, biastype = symmetricBias(), normtype = NormType(),
                                           modifyIC = modIC))
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst, samplesize = length(x), 
                                asvar = as.matrix(A-r^2*b^2),
                                asbias = r*b, steps = k, pIC = IC1, Infos = Info.matrix))
                 }else
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst, samplesize = length(x), 
                                asvar = as.matrix(A-r^2*b^2),
                                asbias = r*b, steps = k, pIC = NULL, Infos = Info.matrix))
@@ -559,11 +566,13 @@
                                  paste("maximum MSE-inefficiency: ", round(ineff, 3), sep = "")), 
                                  ncol = 2, dimnames = list(NULL, c("method", "message")))
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst, samplesize = length(x), 
                                asvar = as.matrix(A-r^2*b^2),
                                asbias = r*b, steps = k, pIC = IC1, Infos = Info.matrix))
                 }else
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst, samplesize = length(x), 
                                asvar = as.matrix(A-r^2*b^2),
                                asbias = r*b, steps = k, pIC = NULL, Infos = Info.matrix))
@@ -649,11 +658,13 @@
                                           w = w, biastype = symmetricBias(), normtype = NormType(),
                                           modifyIC = modIC))
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst$est, samplesize = length(x), 
                                asvar = as.matrix(robEst$A-r^2*robEst$b^2),
                                asbias = r*robEst$b, steps = k, pIC = IC1, Infos = Info.matrix))
                 }else
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst$est, samplesize = length(x), 
                                asvar = as.matrix(robEst$A-r^2*robEst$b^2),
                                asbias = r*robEst$b, steps = k, pIC = NULL, Infos = Info.matrix))
@@ -747,11 +758,13 @@
                                  paste("maximum MSE-inefficiency: ", round(ineff, 3), sep = "")), 
                                  ncol = 2, dimnames = list(NULL, c("method", "message")))
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst$est, samplesize = length(x), 
                                asvar = as.matrix(robEst$A-r^2*robEst$b^2),
                                asbias = r*robEst$b, steps = k, pIC = IC1, Infos = Info.matrix))
                 }else
                     return(new("kStepEstimate", name = "Optimally robust estimate",
+                               estimate.call = es.call,
                                estimate = robEst$est, samplesize = length(x), 
                                asvar = as.matrix(robEst$A-r^2*robEst$b^2),
                                asbias = r*robEst$b, steps = k, pIC = NULL, Infos = Info.matrix))

Modified: branches/robast-0.6/pkg/RobLox/chm/00Index.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/00Index.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/00Index.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -15,7 +15,7 @@
 
 <table width="100%">
 <tr><td width="25%"><a href="rowRoblox.html">colRoblox</a></td>
-<td>Optimally robust estimator for location and/or scale</td></tr>
+<td>Optimally robust estimation for location and/or scale</td></tr>
 <tr><td width="25%"><a href="rlOptIC.html">rlOptIC</a></td>
 <td>Computation of the optimally robust IC for AL estimators</td></tr>
 <tr><td width="25%"><a href="rlsOptIC.AL.html">rlsOptIC.AL</a></td>
@@ -57,7 +57,7 @@
 <tr><td width="25%"><a href="roblox.html">roblox</a></td>
 <td>Optimally robust estimator for location and/or scale</td></tr>
 <tr><td width="25%"><a href="rowRoblox.html">rowRoblox</a></td>
-<td>Optimally robust estimator for location and/or scale</td></tr>
+<td>Optimally robust estimation for location and/or scale</td></tr>
 <tr><td width="25%"><a href="rsOptIC.html">rsOptIC</a></td>
 <td>Computation of the optimally robust IC for AL estimators</td></tr>
 </table>

Modified: branches/robast-0.6/pkg/RobLox/chm/RobLox.chm
===================================================================
(Binary files differ)

Modified: branches/robast-0.6/pkg/RobLox/chm/RobLox.toc
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/RobLox.toc	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/RobLox.toc	2008-08-03 04:02:37 UTC (rev 140)
@@ -175,9 +175,13 @@
 <param name="Local" value="rlsOptIC.TuMad.html">
 </OBJECT>
 <LI> <OBJECT type="text/sitemap">
-<param name="Name" value="Optimally robust estimator for location and/or scale">
+<param name="Name" value="Optimally robust estimation for location and/or scale">
 <param name="Local" value="rowRoblox.html">
 </OBJECT>
+<LI> <OBJECT type="text/sitemap">
+<param name="Name" value="Optimally robust estimator for location and/or scale">
+<param name="Local" value="roblox.html">
+</OBJECT>
 </UL>
 </UL>
 </BODY></HTML>

Modified: branches/robast-0.6/pkg/RobLox/chm/rlOptIC.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlOptIC.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlOptIC.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -63,7 +63,7 @@
 
 <p>
 If 'computeIC' is 'TRUE' an object of class <code>"ContIC"</code> is returned, 
-otherwise a list of Lagrane multipliers
+otherwise a list of Lagrange multipliers
 </p>
 <table summary="R argblock">
 <tr valign="top"><td><code>A</code></td>
@@ -98,7 +98,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="roblox.html">roblox</a></code>
+<code><a onclick="findlink('RobAStBase', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="roblox.html">roblox</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AL.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AL.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AL.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -89,7 +89,7 @@
 
 <p>
 If 'computeIC' is 'TRUE' an object of class <code>"ContIC"</code> is returned, 
-otherwise a list of Lagrane multipliers
+otherwise a list of Lagrange multipliers
 </p>
 <table summary="R argblock">
 <tr valign="top"><td><code>A</code></td>
@@ -124,7 +124,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="roblox.html">roblox</a></code>
+<code><a onclick="findlink('RobAStBase', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="roblox.html">roblox</a></code>
 </p>
 
 
@@ -142,8 +142,8 @@
 plot(IC1)
 infoPlot(IC1)
 
-## one-step estimation
-## see also: ?roblox
+## k-step estimation
+## better use function roblox (see ?roblox)
 ## 1. data: random sample
 ind &lt;- rbinom(100, size=1, prob=0.05) 
 x &lt;- rnorm(100, mean=0, sd=(1-ind) + ind*9)
@@ -152,19 +152,29 @@
 median(x)
 mad(x)
 
-## 2. Kolmogorov(-Smirnov) minimum distance estimator
+## 2. Kolmogorov(-Smirnov) minimum distance estimator (default)
 ## -&gt; we use it as initial estimate for one-step construction
-(est0 &lt;- MDEstimator(x, ParamFamily = NormLocationScaleFamily(), distance = KolmogorovDist))
+(est0 &lt;- MDEstimator(x, ParamFamily = NormLocationScaleFamily()))
 
-## 3. one-step estimation: radius known
-IC1 &lt;- rlsOptIC.AL(r = 0.5, mean = est0$estimate[1], sd = est0$estimate[2])
-(est1 &lt;- oneStepEstimator(x, IC1, est0$estimate))
+## 3.1 one-step estimation: radius known
+IC1 &lt;- rlsOptIC.AL(r = 0.5, mean = estimate(est0)[1], sd = estimate(est0)[2])
+(est1 &lt;- oneStepEstimator(x, IC1, est0))
 
-## 4. one-step estimation: radius unknown
+## 3.2 k-step estimation: radius known
+## Choose k = 3
+(est2 &lt;- kStepEstimator(x, IC1, est0, steps = 3L))
+
+## 4.1 one-step estimation: radius unknown
 ## take least favorable radius r = 0.579
 ## cf. Table 8.1 in Kohl(2005)
-IC2 &lt;- rlsOptIC.AL(r = 0.579, mean = est0$estimate[1], sd = est0$estimate[2])
-(est2 &lt;- oneStepEstimator(x, IC2, est0$estimate))
+IC2 &lt;- rlsOptIC.AL(r = 0.579, mean = estimate(est0)[1], sd = estimate(est0)[2])
+(est3 &lt;- oneStepEstimator(x, IC2, est0))
+
+## 4.2 k-step estimation: radius unknown
+## take least favorable radius r = 0.579
+## cf. Table 8.1 in Kohl(2005)
+## choose k = 3
+(est4 &lt;- kStepEstimator(x, IC2, est0, steps = 3L))
 </pre>
 
 <script Language="JScript">

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An1.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An1.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An1.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -81,7 +81,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An2.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An2.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.An2.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -90,7 +90,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AnMad.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AnMad.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.AnMad.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -82,7 +82,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.BM.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.BM.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.BM.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -93,7 +93,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha3.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha3.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha3.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -89,7 +89,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha4.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha4.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Ha4.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -96,7 +96,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HaMad.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HaMad.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HaMad.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -95,7 +95,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu1.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu1.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu1.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -81,7 +81,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -89,7 +89,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2a.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2a.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu2a.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -91,7 +91,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu3.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu3.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Hu3.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -92,7 +92,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HuMad.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HuMad.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.HuMad.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -82,7 +82,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.M.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.M.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.M.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -101,7 +101,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.MM2.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.MM2.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.MM2.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -90,7 +90,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu1.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu1.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu1.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -81,7 +81,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu2.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu2.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.Tu2.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -90,7 +90,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.TuMad.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.TuMad.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rlsOptIC.TuMad.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -81,7 +81,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
+<code><a onclick="findlink('RobAStBase', 'IC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">IC-class</a></code>
 </p>
 
 

Modified: branches/robast-0.6/pkg/RobLox/chm/roblox.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/roblox.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/roblox.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -101,30 +101,14 @@
 </p>
 <p>
 If <code>eps</code> is missing, the radius-minimax estimator in sense of 
-Rieder et al. (2001), respectively Section 2.2 of Kohl (2005) is returned.
+Rieder et al. (2001, 2008), respectively Section 2.2 of Kohl (2005) is returned.
 </p>
 
 
 <h3>Value</h3>
 
 <p>
-An object of S3-class <code>"ALEstimate"</code> which inherits from 
-class <code>"Estimate"</code>, a list with components
-</p>
-<table summary="R argblock">
-<tr valign="top"><td><code>estimate </code></td>
-<td>
-location and/or scale estimate </td></tr>
-<tr valign="top"><td><code>steps </code></td>
-<td>
-number of k-steps used to compute the estimate </td></tr>
-<tr valign="top"><td><code>Infos </code></td>
-<td>
-additional information about the estimate </td></tr>
-<tr valign="top"><td><code>optIC</code></td>
-<td>
-object of class <code>"ContIC"</code>; optimally robust IC </td></tr>
-</table>
+Object of class <code>"kStepEstimate"</code>.</p>
 
 <h3>Author(s)</h3>
 
@@ -158,8 +142,10 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="rlOptIC.html">rlOptIC</a></code>, 
-<code><a href="rsOptIC.html">rsOptIC</a></code>, <code><a href="rlsOptIC.AL.html">rlsOptIC.AL</a></code>
+<code><a onclick="findlink('RobAStBase', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="rlOptIC.html">rlOptIC</a></code>, 
+<code><a href="rsOptIC.html">rsOptIC</a></code>, <code><a href="rlsOptIC.AL.html">rlsOptIC.AL</a></code>,
+<code><a onclick="findlink('RobAStBase', 'kStepEstimate-class.html')" style="text-decoration: underline; color: blue; cursor: hand">kStepEstimate-class</a></code>,
+<code><a onclick="findlink('ROptEst', 'roptest.html')" style="text-decoration: underline; color: blue; cursor: hand">roptest</a></code>
 </p>
 
 
@@ -171,25 +157,23 @@
 
 ## amount of gross errors known
 res1 &lt;- roblox(x, eps = 0.05, returnIC = TRUE)
-res1$mean
-res1$sd
-res1$optIC
-checkIC(res1$optIC)
-Risks(res1$optIC)
-Infos(res1$optIC)
-plot(res1$optIC)
-infoPlot(res1$optIC)
+estimate(res1)
+pIC(res1)
+checkIC(pIC(res1))
+Risks(pIC(res1))
+Infos(pIC(res1))
+plot(pIC(res1))
+infoPlot(pIC(res1))
 
 ## amount of gross errors unknown
 res2 &lt;- roblox(x, eps.lower = 0.01, eps.upper = 0.1, returnIC = TRUE)
-res2$mean
-res2$sd
-res2$optIC
-checkIC(res2$optIC)
-Risks(res2$optIC)
-Infos(res2$optIC)
-plot(res2$optIC)
-infoPlot(res2$optIC)
+estimate(res2)
+pIC(res2)
+checkIC(pIC(res2))
+Risks(pIC(res2))
+Infos(pIC(res2))
+plot(pIC(res2))
+infoPlot(pIC(res2))
 
 ## estimator comparison
 # classical optimal (non-robust)
@@ -199,22 +183,22 @@
 c(median(x), mad(x))
 
 # optimally robust (amount of gross errors known)
-c(res1$mean, res1$sd)
+estimate(res1)
 
 # optimally robust (amount of gross errors unknown)
-c(res2$mean, res2$sd)
+estimate(res2)
 
 # Kolmogorov(-Smirnov) minimum distance estimator (robust)
-(ks.est &lt;- MDEstimator(x, ParamFamily = NormLocationScaleFamily(), distance = KolmogorovDist))
+(ks.est &lt;- MDEstimator(x, ParamFamily = NormLocationScaleFamily()))
 
 # optimally robust (amount of gross errors known)
-roblox(x, eps = 0.05, initial.est = ks.est$estimate)
+roblox(x, eps = 0.05, initial.est = estimate(ks.est))
 
 # Cramer von Mises minimum distance estimator (robust)
 (CvM.est &lt;- MDEstimator(x, ParamFamily = NormLocationScaleFamily(), distance = CvMDist))
 
 # optimally robust (amount of gross errors known)
-roblox(x, eps = 0.05, initial.est = CvM.est$estimate)
+roblox(x, eps = 0.05, initial.est = estimate(CvM.est))
 </pre>
 
 <script Language="JScript">

Modified: branches/robast-0.6/pkg/RobLox/chm/rowRoblox.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rowRoblox.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rowRoblox.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -1,4 +1,4 @@
-<html><head><title>Optimally robust estimator for location and/or scale</title>
+<html><head><title>Optimally robust estimation for location and/or scale</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" type="text/css" href="Rchm.css">
 </head>
@@ -7,18 +7,18 @@
 <table width="100%"><tr><td>rowRoblox and colRoblox(RobLox)</td><td align="right">R Documentation</td></tr></table><object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
 <param name="keyword" value="R:   rowRoblox">
 <param name="keyword" value="R:   colRoblox">
-<param name="keyword" value=" Optimally robust estimator for location and/or scale">
+<param name="keyword" value=" Optimally robust estimation for location and/or scale">
 </object>
 
 
-<h2>Optimally robust estimator for location and/or scale</h2>
+<h2>Optimally robust estimation for location and/or scale</h2>
 
 
 <h3>Description</h3>
 
 <p>
 The functions <code>rowRoblox</code> and <code>colRoblox</code> compute 
-the optimally robust estimator for normal location und/or scale and 
+optimally robust estimates for normal location und/or scale and 
 (convex) contamination neighborhoods. The definition of 
 these estimators can be found in Rieder (1994) or Kohl (2005),
 respectively.
@@ -74,8 +74,10 @@
 scale with location specified, or both if neither is specified. The computation
 uses a k-step construction with an appropriate initial estimate for location
 or scale or location and scale, respectively. Valid candidates are e.g. 
-median and/or MAD (default) as well as Kolmogorov(-Smirnov) or von Mises minimum 
-distance estimators; cf. Rieder (1994) and Kohl (2005).
+median and/or MAD (default) as well as Kolmogorov(-Smirnov) or Cram'er von 
+Mises minimum distance estimators; cf. Rieder (1994) and Kohl (2005). In case 
+package Biobase from Bioconductor is installed as is suggested, 
+median and/or MAD are computed using function <code>rowMedians</code>.
 </p>
 <p>
 These functions are optimized for the situation where one has a matrix 
@@ -87,7 +89,7 @@
 If the amount of gross errors (contamination) is known, it can be 
 specified by <code>eps</code>. The radius of the corresponding infinitesimal 
 contamination neighborhood is obtained by multiplying <code>eps</code> 
-by the square root of the sample size. 
+by the square root of the sample size.
 </p>
 <p>
 If the amount of gross errors (contamination) is unknown, try to find a 
@@ -112,27 +114,15 @@
 In case of location, respectively scale one additionally has to specify
 <code>sd</code>, respectively <code>mean</code> where <code>sd</code> and <code>mean</code> can
 be a single number, i.e., identical for all rows, respectively columns,
-or a vector, i.e., different for all rows, respectively columns.
+or a vector with length identical to the number of rows, respectively 
+columns.
 </p>
 
 
 <h3>Value</h3>
 
 <p>
-An object of S3-class <code>"ALEstimate"</code> which inherits from 
-class <code>"Estimate"</code>, a list with components
-</p>
-<table summary="R argblock">
-<tr valign="top"><td><code>estimate </code></td>
-<td>
-location and/or scale estimates </td></tr>
-<tr valign="top"><td><code>steps </code></td>
-<td>
-number of k-steps used to compute the estimates </td></tr>
-<tr valign="top"><td><code>Infos </code></td>
-<td>
-additional information about the estimates </td></tr>
-</table>
+Object of class <code>"kStepEstimate"</code>.</p>
 
 <h3>Author(s)</h3>
 
@@ -166,7 +156,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a href="roblox.html">roblox</a></code>
+<code><a href="roblox.html">roblox</a></code>, <code><a onclick="findlink('RobAStBase', 'kStepEstimate-class.html')" style="text-decoration: underline; color: blue; cursor: hand">kStepEstimate-class</a></code>
 </p>
 
 
@@ -199,6 +189,15 @@
 colRoblox(X3, eps = 0.02, mean = c(-2, 1), k = 4)
 </pre>
 
+<script Language="JScript">
+function findlink(pkg, fn) {
+var Y, link;
+Y = location.href.lastIndexOf("\\") + 1;
+link = location.href.substring(0, Y);
+link = link + "../../" + pkg + "/chtml/" + pkg + ".chm::/" + fn;
+location.href = link;
+}
+</script>
 
 
 <hr><div align="center">[Package <em>RobLox</em> version 0.6.0 <a href="00Index.html">Index]</a></div>

Modified: branches/robast-0.6/pkg/RobLox/chm/rsOptIC.html
===================================================================
--- branches/robast-0.6/pkg/RobLox/chm/rsOptIC.html	2008-08-01 05:41:09 UTC (rev 139)
+++ branches/robast-0.6/pkg/RobLox/chm/rsOptIC.html	2008-08-03 04:02:37 UTC (rev 140)
@@ -69,7 +69,7 @@
 
 <p>
 If 'computeIC' is 'TRUE' an object of class <code>"ContIC"</code> is returned, 
-otherwise a list of Lagrane multipliers
+otherwise a list of Lagrange multipliers
 </p>
 <table summary="R argblock">
 <tr valign="top"><td><code>A</code></td>
@@ -104,7 +104,7 @@
 <h3>See Also</h3>
 
 <p>
-<code><a onclick="findlink('ROptEst', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="roblox.html">roblox</a></code>
+<code><a onclick="findlink('RobAStBase', 'ContIC-class.html')" style="text-decoration: underline; color: blue; cursor: hand">ContIC-class</a></code>, <code><a href="roblox.html">roblox</a></code>
 </p>
 
 

Modified: pkg/ROptEst/chm/ROptEst.chm
===================================================================
(Binary files differ)

Modified: pkg/RandVar/chm/RandVar.chm
===================================================================
(Binary files differ)

Modified: pkg/RobAStBase/chm/RobAStBase.chm
===================================================================
(Binary files differ)

Modified: pkg/RobLox/chm/RobLox.chm
===================================================================
(Binary files differ)



More information about the Robast-commits mailing list