if (FALSE) {
# These examples require external data files not included with the package
# Calculate multiple water indices
water_indices <- calculate_multiple_water_indices(
green = green_band,
nir = nir_band,
swir1 = swir1_band,
indices = c("NDWI", "MNDWI", "NDMI", "MSI"),
output_stack = TRUE,
verbose = TRUE
)
# Access individual indices
ndwi <- water_indices[["NDWI"]]
mndwi <- water_indices[["MNDWI"]]
}
Run the code above in your browser using DataLab