From e0604ab9305ac1a43573a361f9d86b324da0acf3 Mon Sep 17 00:00:00 2001
From: "louis.heraut" <louis.heraut@inrae.fr>
Date: Wed, 10 Nov 2021 14:52:49 +0100
Subject: [PATCH] Minor structure changes
---
processing/.Rhistory | 1 -
processing/.here | 0
script.R | 41 +++++++++++++++++++++++++++++++++++++++++
3 files changed, 41 insertions(+), 1 deletion(-)
delete mode 100644 processing/.Rhistory
delete mode 100644 processing/.here
create mode 100644 script.R
diff --git a/processing/.Rhistory b/processing/.Rhistory
deleted file mode 100644
index 1269488..0000000
--- a/processing/.Rhistory
+++ /dev/null
@@ -1 +0,0 @@
-data
diff --git a/processing/.here b/processing/.here
deleted file mode 100644
index e69de29..0000000
diff --git a/script.R b/script.R
new file mode 100644
index 0000000..f45b8da
--- /dev/null
+++ b/script.R
@@ -0,0 +1,41 @@
+
+### A MODIFIER ###
+
+# Path to the data
+computer_data_path = "/home/louis/Documents/bouleau/INRAE/CDD_stationnarite/data"
+
+# Work path
+computer_work_path = "/home/louis/Documents/bouleau/INRAE/CDD_stationnarite/ASH"
+
+filedir = ""
+
+filename = "H5920011_HYDRO_QJM.txt"
+
+##################
+
+
+# Set working directory
+setwd(computer_work_path)
+
+# Sourcing R file
+source('processing/extract.R')
+source('plotting/panel.R')
+
+# Usefull library
+
+
+# Result directory
+resdir = file.path(computer_work_path, 'results')
+print(paste('resdir :', resdir))
+
+# Figure directory
+figdir = file.path(computer_work_path, 'figures')
+print(paste('figdir :', figdir))
+
+
+df_info = extract_info(computer_data_path, filedir, filename)
+df_data = extract_data(computer_data_path, filedir, filename)
+
+panel(df_data, df_info, figdir, filedir)
+
+
--
GitLab