if (FALSE) {
# Not run:
# Get first 10 failed tasks
failed <- task_get("simulation_study", status = "failed")
print(failed$message) # View error messages
# Get all finished tasks
finished <- task_get("simulation_study", status = "finished", limit = 1000)
hist(finished$runtime, main = "Task Runtime Distribution")
# Get tasks of any status
all_tasks <- task_get("simulation_study", status = "all", limit = 50)
}
Run the code above in your browser using DataLab