# NOT RUN {
## load dataset
data(datamsaeRB)
# Compute MSE EBLUP and Ratio Benchmark
## Using parameter 'data'
mse_sae = mse_saeRB(Y1 ~ X1 + X2, v1, w1, data = datamsaeRB)
## Without parameter 'data'
mse_sae = mse_saeRB(datamsaeRB$Y1 ~ datamsaeRB$X1 + datamsaeRB$X2, datamsaeRB$v1, datamsaeRB$w1)
## Return
mse_sae$pbmse.eblupRB # to see the MSE Ratio Benchmark estimators
# }
Run the code above in your browser using DataLab