calc_intensity_area: Calculate carbon footprint intensity per hectare

In cowfootR: Dairy Farm Carbon Footprint Assessment

Calculate carbon footprint intensity per hectare

Description

Computes emissions intensity per unit of land area for dairy farm analysis.

Usage

calc_intensity_area(
  total_emissions,
  area_total_ha,
  area_productive_ha = NULL,
  area_breakdown = NULL,
  validate_area_sum = TRUE
)

Arguments

total_emissions	Numeric or cf_total object. Total emissions in kg CO2eq (from calc_total_emissions()) or the object itself.
area_total_ha	Numeric. Total farm area in hectares.
area_productive_ha	Numeric. Productive/utilized area in hectares. If NULL, uses total area. Default = NULL.
area_breakdown	Named list or named numeric vector. Optional detailed area breakdown by land use type. Names should be descriptive (e.g., "pasture_permanent", "crops_feed").
validate_area_sum	Logical. Check if area breakdown sums to total? Default = TRUE.

Details

The area_breakdown parameter allows detailed tracking by land use:

area_breakdown = list(
  pasture_permanent = 80,
  pasture_temporary = 20,
  crops_feed = 15,
  crops_cash = 5,
  infrastructure = 2,
  woodland = 8
)

Value

A list of class "cf_area_intensity" with intensity metrics and area analysis.

Examples

# Basic calculation
calc_intensity_area(total_emissions = 85000, area_total_ha = 120)

# With productive area distinction
calc_intensity_area(
  total_emissions = 95000,
  area_total_ha = 150,
  area_productive_ha = 135
)

# With area breakdown
area_detail <- list(
  pasture_permanent = 80,
  pasture_temporary = 25,
  crops_feed = 20,
  infrastructure = 3,
  woodland = 7
)
calc_intensity_area(
  total_emissions = 88000,
  area_total_ha = 135,
  area_breakdown = area_detail
)

# Using with calc_total_emissions output
#

# b <- set_system_boundaries("farm_gate")
# e1 <- calc_emissions_enteric(100, boundaries = b)
# e2 <- calc_emissions_manure(100, boundaries = b)
# tot <- calc_total_emissions(e1, e2)
# calc_intensity_area(tot, area_total_ha = 120)
#

cowfootR documentation built on Jan. 13, 2026, 5:07 p.m.