job <- gsSurvCalendarTune(
calendarTime = tune_values(list(c(12, 24, 36), c(12, 24, 48))),
spending = c("information", "calendar")
)
# \donttest{
job$run(strategy = "grid", parallel = FALSE, seed = 1)
utils::head(job$results())
# }
Run the code above in your browser using DataLab