This function facilitates the loading of data templates, which include both station information and measurement data (e.g. calibration, weather, soil, point source data.).
Arguments
- template_path
Character, the path to the *.xlsx file containing the data template.
- epsg_code
(optional) Integer, EPSG code for station coordinates. Default
epsg_code = 4326, which stands for WGS 84 coordinate system.
Value
A nested list with dataframes.
Nested structure: meteo_lst -> data -> Station ID -> Parameter ->
Dataframe (DATE, PARAMETER),
meteo_lst -> stations -> Dataframe (ID, Name, Elevation, Source,
geometry, Long, Lat).
Examples
if (FALSE) {
## Three types of templates could be used
# 1) Example of template for weather data
temp_path <- system.file("extdata", "weather_data.xlsx", package = "SWATprepR")
met_lst <- load_template(temp_path, 3035)
## 2) Example of template for calibration data
temp_path <- system.file("extdata", "calibration_data.xlsx", package = "SWATprepR")
cal_data <- load_template(temp_path)
## 3) Example of template for point source:
temp_path <- system.file("extdata", "pnt_data.xls", package = "SWATprepR")
pnt_data <- load_template(temp_path)
}