script.R 812 Bytes
Newer Older
Heraut Louis's avatar
Heraut Louis committed

### 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)