diff --git a/tests/testthat/test-emissions_profile_upstream.R b/tests/testthat/test-emissions_profile_upstream.R index 805a988e..9c190515 100644 --- a/tests/testthat/test-emissions_profile_upstream.R +++ b/tests/testthat/test-emissions_profile_upstream.R @@ -301,7 +301,7 @@ test_that("at company level, `NA` in a benchmark yields `value = 1` where `group pull(sum) |> expect_equal(1) - benchmark <- "input_tilt_sector" + benchmark <- "input_tilt_subsector" co2 <- example_inputs("{ benchmark }" := c(NA)) out <- emissions_profile_upstream(companies, co2) |> unnest_company() # For each benchmark `value` adds to 1