Add start_log

log/start_log.R

+library(shinytest)
+library(shinyloadtest)
+
+# Pour faire un record sur un site web shiny
+shinyloadtest::record_session('https://shiny.mbb.univ-montp2.fr/RPACIB/', output_file = "./log/record.log")
+
+# Pour lan un run avec le recorde que l'on vient de faire
+# shinycannon record.log https://shiny.mbb.univ-montp2.fr/RPACIB/--workers 10 --loaded-duration-minutes 2 --output-dir run1
+
+# Pour récupérer les résultats de notre recorde
+df <- shinyloadtest::load_runs("10 workers" = "./log/run1")
+
+# Pour compiler les résultats dans un html
+shinyloadtest_report(df,"run1.html",self_contained=F)