Commit 7de44b3f authored by Sebastian Ostberg's avatar Sebastian Ostberg
Browse files

update working directory for temporary downloads

parent a5836b42
......@@ -292,12 +292,12 @@ if (!experiment %in% names(historical_remote_dir) ||
################################################################################
## Calculations of historical reference ##
# Download historical time series data
if (!file.exists("output")) {
dir.create("output")
if (!dir.exists("tmp")) {
dir.create("tmp")
}
hist_timeseries_filename <- download_yield_data(
runtype = "historical",
localname = "output/hist_timeseries.nc",
localname = "tmp/hist_timeseries.nc",
experiment = experiment,
irrigation_scenario = NULL,
fertilizer_scenario = NULL,
......@@ -411,7 +411,7 @@ harvested_area_all_count <- array(0,
for (wy in forecast_weather_options) {
forecast_filename <- download_yield_data(
runtype = "forecast",
localname = "output/forecast.nc",
localname = "tmp/forecast.nc",
experiment = experiment,
irrigation_scenario = irrigation_scenario,
fertilizer_scenario = fertilizer_scenario,
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment