# historic_scenario<-make_climate_scenario(metric_folder=chillout_folder,
# criteria_list=list(cult,c(1975,2000,2015)),
# caption=c("Historic","data"),
# time_series=TRUE,
# labels=c(1975,2000,2015),
# historic_data=historic_data)
Run the code above in your browser using DataLab