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)
|
outlier_threshold <- median_ci - (2 * sd_ci)
|
||||||
low_ci_pixels <- sum(valid_values < outlier_threshold)
|
low_ci_pixels <- sum(valid_values < outlier_threshold)
|
||||||
total_pixels <- length(valid_values)
|
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
|
# Classify gap severity
|
||||||
gap_level <- dplyr::case_when(
|
gap_level <- dplyr::case_when(
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue