Winodws importation and test

script.R

@@ -2,15 +2,18 @@
 ### A MODIFIER ###
 
 # Path to the data
-computer_data_path = "/home/louis/Documents/bouleau/INRAE/CDD_stationnarite/data"
-
+computer_data_path = #"/home/louis/Documents/bouleau/INRAE/CDD_stationnarite/data"
+                     "C:\\Users\\louis.heraut\\Documents\\CDD_stationnarite\\data"
+  
 # Work path
-computer_work_path = "/home/louis/Documents/bouleau/INRAE/CDD_stationnarite/ASH"
+computer_work_path = #"/home/louis/Documents/bouleau/INRAE/CDD_stationnarite/ASH"
+                     "C:\\Users\\louis.heraut\\Documents\\CDD_stationnarite\\ASH"
 
-filedir = ""
+# Path to data that will be analysed
+filedir = "test"
 
-filename = c("H5920011_HYDRO_QJM.txt", "K4470010_HYDRO_QJM.txt")
-# filename = "all"
+filename = #c("H5920011_HYDRO_QJM.txt", "K4470010_HYDRO_QJM.txt")
+           "all"
 
 ##################
 
@@ -28,10 +31,16 @@ source('plotting/panel.R')
 
 # Result directory
 resdir = file.path(computer_work_path, 'results')
+if (!(file.exists(resdir))) {
+  dir.create(resdir)
+}
 print(paste('resdir :', resdir))
 
 # Figure directory
 figdir = file.path(computer_work_path, 'figures')
+if (!(file.exists(figdir))) {
+  dir.create(figdir)
+}
 print(paste('figdir :', figdir))