expected_residual_lifetime.Rd
expected residual lifetime of heating system contingent upon current system age
expected_residual_lifetime(tech, system_age)
heating tech
age in years
residual lifetime in years
expected_residual_lifetime("heat_pump",15) #> [1] 5.879068