boot.ci.M(X1, X2, alpha = 0.05, est = huber.one.step, R = 1000, type = "perc")
boot.ci
from the library boot
.R
if NAs
occur because MAD = 0.bootstrap
, boot
X1<-rnorm(100,2,2.5)
X2<-rnorm(100,3,3)
boot.ci.M(X1,X2)
Run the code above in your browser using DataLab