a <- lmrob(LNOx ~ LNOxEm + sqrtWS, data=NOxEmissions)
set.seed(123)
tmp <- frb(lmrob.object=a, nboot=1000, return.coef=FALSE)
Error in .C("R_frb", as.double(xx), as.double(yy), as.double(w), as.integer(n), :
"R_frb" not available for .C() for package "FRB"