# Example with toy data
set.seed(123)
hist_sizes <- rgamma(100, shape = 2, scale = 5)
sim_sizes <- rgamma(200, shape = 2, scale = 4)
check_fire_data(fires_hist_size = hist_sizes,
sim_perimeters_size = sim_sizes,
n_years = 10)
Run the code above in your browser using DataLab