d <-simulate_nonlinear(100)
p<- names(d)[1:4]
tuningparams = list(
"mtry" = c(5,10,15),
"nodedepth" = c(5,10,15,20),
"nodesize" = c(20,30,50)
)
m_srf<- survsrf_train(d,p,tuningparams=tuningparams)
Run the code above in your browser using DataLab