ex_results <- system.file("extdata/example_results",
package = "futureheatwaves")
apply_all_models(ex_results, FUN = average_mean_temp)
apply_all_models(ex_results, FUN = average_mean_temp,
city_specific = TRUE)
Run the code above in your browser using DataLab