Last chance! 50% off unlimited learning
Sale ends in
lmRob
.lmRob.control(tlo = 1e-4, tua = 1.5e-06, mxr = 50, mxf = 50, mxs = 50, tl = 1e-06, estim = "Final", initial.alg = "Auto", final.alg = "MM", seed = 1313, level = 0.1, efficiency = 0.9, weight = c("Optimal", "Optimal"), trace = TRUE)
tl
, the scale estimate is set equal to tl
.estim="Initial"
, only the initial estimates are computed; if estim="Final"
, then final estimates are returned."Auto"
for data-dependent
algorithm, "Random"
for random resampling, "Exhaustive"
for exhaustive resampling, "Fast"
for "Adaptive"
for the robust efficient weighted least squares as proposed in Gervini and Yohai (1999), and "MM"
for MM-estimate as proposed in Yohai, Stahe"Optimal
TRUE
, the remaining computing time will be printed.lmRob
.data(stack.dat)
my.control <- lmRob.control(weight=c("Bisquare","Optimal"))
stack.bo <- lmRob(Loss ~ ., data = stack.dat, control = my.control)
Run the code above in your browser using DataLab