# NOT RUN {
##------------------------------------------------------------
## Generate partial plot for covariate x1
##-------------------------------------------------------------
dta <- simLong(n = 100, N = 5, rho =.80, model = 1, q_x = 0,
q_y = 0,type = "corCompSym")$dtaL
# Boosting call: Raw values of covariates, B-spline for time,
# no shrinkage, no estimate of rho and phi
boost.grow <- BoostMLR(x = dta$features, tm = dta$time, id = dta$id,
y = dta$y, M = 100, VarFlag = FALSE)
Partial_Plot_x1 <- partial.BoostMLR(Object = boost.grow, xvar.name = "x1",plot.it = FALSE)
# }
Run the code above in your browser using DataLab