Obtain total cumulative burn area ratios

Obtain ratios of modeled total CBA to that of observed data as well as to baseline model run output.

ba_ratios(files, years = 1950:2013, domain = "Full")

Arguments

files

vector of workspace files from ALFRESCO outputs Shiny app; run directory basename format expected to begin with fmo, e.g., fmo00s00i.
years

numeric, defaults to 1950:2013.
domain

character, "Full" or "Masked", the full ALFRESCO run domain or the subregion masked to the extent of observed historical fire.

Value

a data frame.

Details

The table of ratios show minimum, mean and maximums across ALFRESCO replicates for CBA and the corresponding percent change vs. both the empirically observed CBA and the baseline/status quo (no fire management options) model run over the same historical period.

Examples

# NOT RUN {
indir <- "C:/github/Flammability/data/fmo/app_workspaces"
files <- list.files(indir, full.names = TRUE)
x <- ba_ratios(files)

library(dplyr)
select(x, -PctIgSupp) %>% group_by(PctFsSupp) %>% summarise_all(function(x) round(mean(x), 3))
# }