if (FALSE) {
test <- function() {
util_setup_rstudio_job("xx")
Sys.sleep(5)
progress(50)
progress_msg("halfway through")
Sys.sleep(5)
progress(100)
Sys.sleep(1)
}
test()
}
Run the code above in your browser using DataLab