BenchmarkData <- shinyloadtest::load_runs(
`1 user` = "examples/23-performance/test_sessions/test1",
`5 users` = "examples/23-performance/test_sessions/test5",
`10 users` = "examples/23-performance/test_sessions/test10"
)
# If you getting errors related to gtable
# you can install this branch of dev version
# remotes::install_github("rstudio/shinyloadtest@gtable-error")
shinyloadtest::shinyloadtest_report(BenchmarkData, "examples/23-performance/report.html")