Confirm that methane capture systems include leakage control measures.

check_applicability_leakage_control_iiid(
  data,
  control_indicator_col = "leakage_controls_in_place",
  group_cols = NULL,
  output_col = "leakage_controls_applicable"
)

Arguments

data

Tibble containing leakage control records.

control_indicator_col

Column storing logical indicators of leakage controls.

group_cols

Optional character vector specifying grouping columns.

output_col

Name of the logical output column.

Value

Tibble indicating whether leakage controls are documented for each group.

Examples

controls <- tibble::tibble(
  farm_id = c("A", "B"),
  leakage_controls_in_place = c(TRUE, FALSE)
)
check_applicability_leakage_control_iiid(controls, group_cols = "farm_id")
#> # A tibble: 2 × 2
#>   farm_id leakage_controls_applicable
#>   <chr>   <lgl>                      
#> 1 A       TRUE                       
#> 2 B       FALSE