Perimeter calculation

Calculate perimeter (linear meter) according to surface, and add the value to the scenario dataframe

Usage

perimeter_calculation(scenario)

Arguments

scenario

data.frame scenario obtained with create_scenario function

Value

scenario_updated

Examples

scenario_apprentissage <- create_scenario(
  system.file("input_1culture_2pop.xlsx", package = "ambre")
)

scenario_apprentissage_updated <- perimeter_calculation(scenario_apprentissage)
print(scenario_apprentissage_updated$perimeter)
#> [1] 25.29822 47.32864