data <- simulation_prediction_conti(
train_prop = 0.7,
n_subject = 20,
seed = 1,
nonlinear = FALSE,
residual = "normal",
randeff = "MVN"
)
model <- BMLMM_prediction(
X_train = data$X_train,
Y_train = data$Y_train,
Z_train = data$Z_train,
subject_id_train = data$subject_id_train,
X_test = data$X_test,
Z_test = data$Z_test,
subject_id_test = data$subject_id_test,
model = "BMTrees",
binary = FALSE,
nburn = 0L, npost = 1L, skip = 1L, verbose = FALSE, seed = 1
)
Run the code above in your browser using DataLab