# NOT RUN {
library(StratifiedMedicine)
## Continuous ##
dat_ctns = generate_subgrp_data(family="gaussian")
Y = dat_ctns$Y
X = dat_ctns$X
A = dat_ctns$A
# Fit through ple_train wrapper #
mod2 = ple_train(Y=Y, A=A, X=X, Xtest=X, ple="ple_ranger" )
summary(mod2$mu_train)
res2 = predict(mod2) # newdata=NULL, training data #
res3 = predict(mod2, newdata=X) # test data #
summary(res2)
summary(res3)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab