# \dontshow{
set.seed(28)
data <- SimulateSMD()
mf.random <- MetaForest(formula = yi ~ ., data = data$training,
whichweights = "random")
print(summary(mf.random), digits = 3)
# }
Run the code above in your browser using DataLab