# NOT RUN {
test_with_dir("Quarantine side effects.", {
load_mtcars_example() # Get the code with drake_example("mtcars").
config <- make(my_plan) # Run the project, build the targets.
known_times <- c(5, rep(7200, nrow(my_plan) - 1))
names(known_times) <- c(file_store("report.md"), my_plan$target[-1])
known_times
# Predict the runtime
predict_runtime(
config,
jobs = 7,
from_scratch = TRUE,
known_times = known_times
)
predict_runtime(
config,
jobs = 8,
from_scratch = TRUE,
known_times = known_times
)
balance <- predict_load_balancing(
config,
jobs = 7,
from_scratch = TRUE,
known_times = known_times,
targets_only = TRUE
)
balance
})
# }
Run the code above in your browser using DataCamp Workspace