if (FALSE) {
# Begin the progress bar for a simulation
progressBar(type = "begin", totalSteps = numIterations * numTimesteps)
# Increase the progress bar by one step for a simulation
progressBar(type = "step")
# Report progress for a simulation
progressBar(type = "report", iteration = iter, timestep = ts)
# Report arbitrary progress message
progressBar(type = "message", message = msg)
# End the progress bar for a simulation
progressBar(type = "end")
}
Run the code above in your browser using DataLab