round to 2 decimals the gap score
This commit is contained in:
parent
750db99a41
commit
be29e4fcb3
|
|
@ -206,7 +206,7 @@ calculate_gap_filling_kpi <- function(ci_raster, field_boundaries) {
|
|||
outlier_threshold <- median_ci - (2 * sd_ci)
|
||||
low_ci_pixels <- sum(valid_values < outlier_threshold)
|
||||
total_pixels <- length(valid_values)
|
||||
gap_score <- (low_ci_pixels / total_pixels) * 100
|
||||
gap_score <- round((low_ci_pixels / total_pixels) * 100, 2)
|
||||
|
||||
# Classify gap severity
|
||||
gap_level <- dplyr::case_when(
|
||||
|
|
|
|||
Loading…
Reference in a new issue