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) || ...@@ -292,12 +292,12 @@ if (!experiment %in% names(historical_remote_dir) ||
################################################################################ ################################################################################
## Calculations of historical reference ## ## Calculations of historical reference ##
# Download historical time series data # Download historical time series data
if (!file.exists("output")) { if (!dir.exists("tmp")) {
dir.create("output") dir.create("tmp")
} }
hist_timeseries_filename <- download_yield_data( hist_timeseries_filename <- download_yield_data(
runtype = "historical", runtype = "historical",
localname = "output/hist_timeseries.nc", localname = "tmp/hist_timeseries.nc",
experiment = experiment, experiment = experiment,
irrigation_scenario = NULL, irrigation_scenario = NULL,
fertilizer_scenario = NULL, fertilizer_scenario = NULL,
...@@ -411,7 +411,7 @@ harvested_area_all_count <- array(0, ...@@ -411,7 +411,7 @@ harvested_area_all_count <- array(0,
for (wy in forecast_weather_options) { for (wy in forecast_weather_options) {
forecast_filename <- download_yield_data( forecast_filename <- download_yield_data(
runtype = "forecast", runtype = "forecast",
localname = "output/forecast.nc", localname = "tmp/forecast.nc",
experiment = experiment, experiment = experiment,
irrigation_scenario = irrigation_scenario, irrigation_scenario = irrigation_scenario,
fertilizer_scenario = fertilizer_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