Climate change policies and health in Kuopio: Difference between revisions
Line 145: | Line 145: | ||
BS <- 24 | BS <- 24 | ||
heating_before <- FALSE | |||
efficiency_before <- TRUE | |||
###################### Decisions | ###################### Decisions | ||
Line 215: | Line 217: | ||
) | ) | ||
buildings@output$EfficiencyPolicy <- factor( | |||
buildings@output$EfficiencyPolicy, | |||
levels = c("BAU", "Active efficiency"), | |||
ordered = TRUE | |||
) | |||
ggplot(subset(bui, EfficiencyPolicy == "BAU"), aes(x = Time, weight = buildingsResult | bui <- oapply(buildings * 1E-6, cols = c("City_area", "buildingsSource"), FUN = sum)@output | ||
ggplot(subset(bui, EfficiencyPolicy == "BAU"), aes(x = Time, weight = buildingsResult, fill = Renovation)) + geom_bar(binwidth = 5) + | |||
facet_grid(. ~ RenovationPolicy) + theme_gray(base_size = BS) + | facet_grid(. ~ RenovationPolicy) + theme_gray(base_size = BS) + | ||
labs( | labs( | ||
Line 225: | Line 233: | ||
) | ) | ||
ggplot(subset(bui, RenovationPolicy == "BAU"), aes(x = Time, weight = buildingsResult | ggplot(subset(bui, RenovationPolicy == "BAU"), aes(x = Time, weight = buildingsResult, fill = Efficiency)) + geom_bar(binwidth = 5) + | ||
facet_grid(. ~ EfficiencyPolicy) + theme_gray(base_size = BS) + | facet_grid(. ~ EfficiencyPolicy) + theme_gray(base_size = BS) + | ||
labs( | labs( | ||
Line 233: | Line 241: | ||
) | ) | ||
ggplot(bui, aes(x = Time, weight = buildingsResult | ggplot(subset(bui, RenovationPolicy == "BAU" & EfficiencyPolicy == "BAU"), aes(x = Time, weight = buildingsResult, fill = Heating)) + geom_bar(binwidth = 5) + | ||
theme_gray(base_size = BS) + | |||
labs( | labs( | ||
title = "Building stock in Kuopio", | title = "Building stock in Kuopio", | ||
Line 241: | Line 249: | ||
) | ) | ||
ggplot(bui, aes(x = Time, weight = buildingsResult | ggplot(subset(bui, RenovationPolicy == "BAU" & EfficiencyPolicy == "BAU"), aes(x = Time, weight = buildingsResult, fill = Building)) + geom_bar(binwidth = 5) + | ||
theme_gray(base_size = BS) + | |||
labs( | labs( | ||
title = "Building stock in Kuopio", | title = "Building stock in Kuopio", | ||
Line 281: | Line 289: | ||
# Plot energy need and emissions | # Plot energy need and emissions | ||
ggplot(heatingEnergy@output, aes(x = Time, weight = heatingEnergyResult * 1E-6, fill = Heating)) + geom_bar() + | ggplot(heatingEnergy@output, aes(x = Time, weight = heatingEnergyResult * 1E-6, fill = Heating)) + geom_bar(binwidth = 5) + | ||
facet_grid(EfficiencyPolicy ~ RenovationPolicy, scale = "free_y") + theme_gray(base_size = BS) + | facet_grid(EfficiencyPolicy ~ RenovationPolicy, scale = "free_y") + theme_gray(base_size = BS) + | ||
labs( | labs( | ||
Line 291: | Line 299: | ||
emis <- truncateIndex(emissions, cols = "Emission_site", bins = 5) | emis <- truncateIndex(emissions, cols = "Emission_site", bins = 5) | ||
ggplot(emis@output, aes(x = Time, weight = emissionsResult, fill = Emission_site)) + geom_bar() + | ggplot(emis@output, aes(x = Time, weight = emissionsResult, fill = Emission_site)) + geom_bar(binwidth = 5) + | ||
facet_grid(Pollutant ~ RenovationPolicy, scale = "free_y") + theme_gray(base_size = BS) + | facet_grid(Pollutant ~ RenovationPolicy, scale = "free_y") + theme_gray(base_size = BS) + | ||
labs( | labs( | ||
Line 323: | Line 331: | ||
exposure <- EvalOutput(exposure, verbose = TRUE) | exposure <- EvalOutput(exposure, verbose = TRUE) | ||
ggplot(exposure@output, aes(x = Time, weight = exposureResult, fill = Heating)) + geom_bar() + facet_grid(Exposure_agent ~ RenovationPolicy, scale = "free_y") + theme_gray(base_size = BS) + | ggplot(exposure@output, aes(x = Time, weight = exposureResult, fill = Heating)) + geom_bar(binwidth = 5) + facet_grid(Exposure_agent ~ RenovationPolicy, scale = "free_y") + theme_gray(base_size = BS) + | ||
labs( | labs( | ||
title = "Exposure to PM2.5 from heating in Kuopio", | title = "Exposure to PM2.5 from heating in Kuopio", | ||
Line 332: | Line 340: | ||
totcases <- EvalOutput(totcases) | totcases <- EvalOutput(totcases) | ||
ggplot(totcases@output, aes(x = as.numeric(as.character(Time)), weight = totcasesResult, fill = Heating))+geom_bar() + | ggplot(totcases@output, aes(x = as.numeric(as.character(Time)), weight = totcasesResult, fill = Heating))+geom_bar(binwidth = 5) + | ||
facet_grid(Trait ~ RenovationPolicy) + | facet_grid(Trait ~ RenovationPolicy) + | ||
theme_gray(base_size = BS) + | theme_gray(base_size = BS) + | ||
Line 398: | Line 406: | ||
### Impact graphs in ENGLISH | ### Impact graphs in ENGLISH | ||
ggplot(buildings@output) + geom_bar() + theme_gray(base_size = BS) + | ggplot(buildings@output) + geom_bar(binwidth = 5) + theme_gray(base_size = BS) + | ||
aes(x = Building, weight = buildingsResult/1000000, fill = Heating) + labs(y = "Floor area (M m2)", title = "Building impacts of renovation policy") + coord_flip() # + facet_grid(. ~ RenovationPolicy) | aes(x = Building, weight = buildingsResult/1000000, fill = Heating) + labs(y = "Floor area (M m2)", title = "Building impacts of renovation policy") + coord_flip() # + facet_grid(. ~ RenovationPolicy) | ||
plo <- ggplot(buildings@output) + geom_bar() + facet_grid(. ~ RenovationPolicy) + theme_gray(base_size = BS) + | plo <- ggplot(buildings@output) + geom_bar(binwidth = 5) + facet_grid(. ~ RenovationPolicy) + theme_gray(base_size = BS) + | ||
aes(x = Year, weight = buildingsResult/1000000, fill = Renovation) + labs(y = "Floor area (M m2)", | aes(x = Year, weight = buildingsResult/1000000, fill = Renovation) + labs(y = "Floor area (M m2)", | ||
title = "Building impacts of renovation policy") | title = "Building impacts of renovation policy") | ||
Line 407: | Line 415: | ||
print(plo) | print(plo) | ||
ggplot(heatingEnergy@output) + geom_bar() + theme_gray(base_size = BS) + labs(title = "Energy impacts of renovation policy") + | ggplot(heatingEnergy@output) + geom_bar(binwidth = 5) + theme_gray(base_size = BS) + labs(title = "Energy impacts of renovation policy") + | ||
aes(x = Building, weight = heatingEnergyResult/1E+6, fill = Heating) + labs(y = "Heating energy need (GWh /a)") + coord_flip() # + facet_grid(. ~ RenovationPolicy) | aes(x = Building, weight = heatingEnergyResult/1E+6, fill = Heating) + labs(y = "Heating energy need (GWh /a)") + coord_flip() # + facet_grid(. ~ RenovationPolicy) | ||
plo <- ggplot(heatingEnergy@output) + geom_bar() + facet_grid(. ~ RenovationPolicy) + theme_gray(base_size = BS) + | plo <- ggplot(heatingEnergy@output) + geom_bar(binwidth = 5) + facet_grid(. ~ RenovationPolicy) + theme_gray(base_size = BS) + | ||
labs(title = "Energy impacts of renovation policy", y = "Heating energy need (GWh /a)") + | labs(title = "Energy impacts of renovation policy", y = "Heating energy need (GWh /a)") + | ||
aes(x = Year, weight = heatingEnergyResult/1E+6, fill = Heating) | aes(x = Year, weight = heatingEnergyResult/1E+6, fill = Heating) | ||
Line 418: | Line 426: | ||
emis@output <- emis@output[emis@output$Renovation == "BAU" , ] | emis@output <- emis@output[emis@output$Renovation == "BAU" , ] | ||
ggplot(emis@output) + geom_bar() + facet_grid(Pollutant ~ . , scales = "free_y") + theme_gray(base_size = BS) + labs(title = "Emission impacts of biofuel policy") + | ggplot(emis@output) + geom_bar(binwidth = 5) + facet_grid(Pollutant ~ . , scales = "free_y") + theme_gray(base_size = BS) + labs(title = "Emission impacts of biofuel policy") + | ||
aes(x = Heating, weight = Result, fill = Fuel) + labs(y = "Emissions to air (ton /a)") + theme(axis.text.x = element_text(angle = 90, hjust = 1)) | aes(x = Heating, weight = Result, fill = Fuel) + labs(y = "Emissions to air (ton /a)") + theme(axis.text.x = element_text(angle = 90, hjust = 1)) | ||
plo <- ggplot(emis@output) + geom_bar() + facet_grid(Pollutant ~ FuelPolicy, scales = "free_y") + theme_gray(base_size = BS) + | plo <- ggplot(emis@output) + geom_bar(binwidth = 5) + facet_grid(Pollutant ~ FuelPolicy, scales = "free_y") + theme_gray(base_size = BS) + | ||
labs(title = "Emission impacts of biofuel policy", y = "Emissions to air (ton /a)") + | labs(title = "Emission impacts of biofuel policy", y = "Emissions to air (ton /a)") + | ||
aes(x = Year, weight = Result, fill = Fuel) | aes(x = Year, weight = Result, fill = Fuel) | ||
Line 427: | Line 435: | ||
print(plo) | print(plo) | ||
ggplot(emissions@output, aes(x = Year, weight = Result, fill = Emission_site)) + geom_bar() + facet_grid( Pollutant ~ ., scales = "free_y") | ggplot(emissions@output, aes(x = Year, weight = Result, fill = Emission_site)) + geom_bar(binwidth = 5) + facet_grid( Pollutant ~ ., scales = "free_y") | ||
colnames(exposure@output)[colnames(exposure@output) == "Pollutant"] <- "Exposure_agent" | colnames(exposure@output)[colnames(exposure@output) == "Pollutant"] <- "Exposure_agent" | ||
ggplot(exposure@output, aes(x = Year, weight = exposureResult)) + geom_bar() + facet_grid(Exposure_agent ~ FuelPolicy, scales = "free_y") | ggplot(exposure@output, aes(x = Year, weight = exposureResult)) + geom_bar(binwidth = 5) + facet_grid(Exposure_agent ~ FuelPolicy, scales = "free_y") | ||
# plo <- ggplot(health@output) + geom_bar() + facet_grid(FuelPolicy ~ RenovationPolicy) + theme_gray(base_size = BS) + | # plo <- ggplot(health@output) + geom_bar(binwidth = 5) + facet_grid(FuelPolicy ~ RenovationPolicy) + theme_gray(base_size = BS) + | ||
# labs(title = "Health impacts of fuel and renovation policy", y = "Premature deaths (# /a)") + | # labs(title = "Health impacts of fuel and renovation policy", y = "Premature deaths (# /a)") + | ||
# aes(x = Year, weight = Result, fill = Heating) | # aes(x = Year, weight = Result, fill = Heating) | ||
Line 440: | Line 448: | ||
#ggplot(health@output) + geom_bar() + theme_gray(base_size = BS) + labs(title = "Health impacts of fuel and renovation policy") + | #ggplot(health@output) + geom_bar(binwidth = 5) + theme_gray(base_size = BS) + labs(title = "Health impacts of fuel and renovation policy") + | ||
#aes(x = Year, weight = Result, fill = Heating) + labs(y = "Premature deaths (# /a)") # + facet_grid(FuelPolicy ~ RenovationPolicy) | #aes(x = Year, weight = Result, fill = Heating) + labs(y = "Premature deaths (# /a)") # + facet_grid(FuelPolicy ~ RenovationPolicy) | ||
#ggplot(cases@output[cases@output$Causes == "PM2.5+" , ], aes(x = Year, weight = Result/10, fill = Disease)) + geom_bar() + facet_grid(FuelPolicy ~ RenovationPolicy, scale = "free_y") | #ggplot(cases@output[cases@output$Causes == "PM2.5+" , ], aes(x = Year, weight = Result/10, fill = Disease)) + geom_bar() + facet_grid(FuelPolicy ~ RenovationPolicy, scale = "free_y") | ||
#ggplot(DALYs@output[DALYs@output$Causes == "PM2.5+" , ], aes(x = Year, weight = Result/10, fill = Response.metric)) + geom_bar() + facet_grid(FuelPolicy ~ RenovationPolicy, scale = "free_y") | #ggplot(DALYs@output[DALYs@output$Causes == "PM2.5+" , ], aes(x = Year, weight = Result/10, fill = Response.metric)) + geom_bar(binwidth = 5) + facet_grid(FuelPolicy ~ RenovationPolicy, scale = "free_y") | ||
ggplot(DALYs@output, aes(x = Year, weight = Result, fill = Trait)) + geom_bar() + facet_grid(RenovationPolicy ~ FuelPolicy) | ggplot(DALYs@output, aes(x = Year, weight = Result, fill = Trait)) + geom_bar(binwidth = 5) + facet_grid(RenovationPolicy ~ FuelPolicy) | ||
### Impact graphs in FINNISH | ### Impact graphs in FINNISH | ||
Line 452: | Line 460: | ||
if(FALSE) { | if(FALSE) { | ||
plo <- ggplot(buildings@output) + geom_bar() + facet_grid(. ~ Remonttipolitiikka) + theme_gray(base_size = BS) + | plo <- ggplot(buildings@output) + geom_bar(binwidth = 5) + facet_grid(. ~ Remonttipolitiikka) + theme_gray(base_size = BS) + | ||
aes(x = Year, weight = buildingsResult/1000000, fill = Renovation) + labs(y = "Rakennuspinta-ala (M m2)", | aes(x = Year, weight = buildingsResult/1000000, fill = Renovation) + labs(y = "Rakennuspinta-ala (M m2)", | ||
title = "Remonttipolitiikan vaikutus rakennuskantaan") | title = "Remonttipolitiikan vaikutus rakennuskantaan") | ||
Line 458: | Line 466: | ||
print(plo) | print(plo) | ||
plo <- ggplot(heatingEnergy@output) + geom_bar() + facet_grid(. ~ Remonttipolitiikka) + theme_gray(base_size = BS) + | plo <- ggplot(heatingEnergy@output) + geom_bar(binwidth = 5) + facet_grid(. ~ Remonttipolitiikka) + theme_gray(base_size = BS) + | ||
labs(title = "Remonttipolitiikan vaikutus energiankulutukseen", y = "Lämmitysenergian tarve (GWh /a)") + | labs(title = "Remonttipolitiikan vaikutus energiankulutukseen", y = "Lämmitysenergian tarve (GWh /a)") + | ||
aes(x = Year, weight = heatingEnergyResult/1E+6, fill = Heating) | aes(x = Year, weight = heatingEnergyResult/1E+6, fill = Heating) | ||
Line 466: | Line 474: | ||
emis@output <- emis@output[emis@output$Remonttipolitiikka == "BAU" , ] | emis@output <- emis@output[emis@output$Remonttipolitiikka == "BAU" , ] | ||
plo <- ggplot(emis@output) + geom_bar() + facet_grid(Pollutant ~ Bioenergiapolitiikka, scales = "free_y") + | plo <- ggplot(emis@output) + geom_bar(binwidth = 5) + facet_grid(Pollutant ~ Bioenergiapolitiikka, scales = "free_y") + | ||
theme_gray(base_size = BS) + labs(title = "Bioenergiapolitiikan päästövaikutukset", y = "Päästöt ilmaan (ton /a)") + | theme_gray(base_size = BS) + labs(title = "Bioenergiapolitiikan päästövaikutukset", y = "Päästöt ilmaan (ton /a)") + | ||
aes(x = Year, weight = Result, fill = Fuel) | aes(x = Year, weight = Result, fill = Fuel) | ||
Line 472: | Line 480: | ||
print(plo) | print(plo) | ||
# plo <- ggplot(health@output) + geom_bar() + facet_grid(Bioenergiapolitiikka ~ Remonttipolitiikka) + theme_gray(base_size = BS) + | # plo <- ggplot(health@output) + geom_bar(binwidth = 5) + facet_grid(Bioenergiapolitiikka ~ Remonttipolitiikka) + theme_gray(base_size = BS) + | ||
# labs(title = "Remontti- ja bioenergiapolitiikan terveysvaikutukset", y = "Ennenaikaisia kuolemia (# /a)") + | # labs(title = "Remontti- ja bioenergiapolitiikan terveysvaikutukset", y = "Ennenaikaisia kuolemia (# /a)") + | ||
# aes(x = Year, weight = Result, fill = Heating) | # aes(x = Year, weight = Result, fill = Heating) | ||
Line 485: | Line 493: | ||
ggplot(RR@output, aes(x = RRResult, colour = Trait)) + geom_density() | ggplot(RR@output, aes(x = RRResult, colour = Trait)) + geom_density() | ||
#ggplot(cases@output, aes(x = Year, weight = Result, fill = Trait)) + geom_bar() + facet_grid(RenovationPolicy ~ #FuelPolicy) | #ggplot(cases@output, aes(x = Year, weight = Result, fill = Trait)) + geom_bar(binwidth = 5) + facet_grid(RenovationPolicy ~ #FuelPolicy) | ||
ggplot(health@output[ter@output$Tehokkuuspolitiikka == "BAU" , ], aes(x = Year, weight = Result/get("N", envir=openv), | ggplot(health@output[ter@output$Tehokkuuspolitiikka == "BAU" , ], aes(x = Year, weight = Result/get("N", envir=openv), | ||
fill = Lämmitys)) + geom_bar() + facet_grid(Remonttipolitiikka ~ Bioenergiapolitiikka) + | fill = Lämmitys)) + geom_bar(binwidth = 5) + facet_grid(Remonttipolitiikka ~ Bioenergiapolitiikka) + | ||
labs(y = "Pienhiukkasten terveyshaitta") | labs(y = "Pienhiukkasten terveyshaitta") | ||
ggplot(cases@output, aes(x = Year, weight = totcasesResult, fill = Trait)) + geom_bar() + facet_grid(RenovationPolicy ~ FuelPolicy) | ggplot(cases@output, aes(x = Year, weight = totcasesResult, fill = Trait)) + geom_bar(binwidth = 5) + facet_grid(RenovationPolicy ~ FuelPolicy) | ||
ggplot(DALYs@output, aes(x = Year, weight = Result, fill = Trait)) + geom_bar() + facet_grid(RenovationPolicy ~ FuelPolicy) | ggplot(DALYs@output, aes(x = Year, weight = Result, fill = Trait)) + geom_bar(binwidth = 5) + facet_grid(RenovationPolicy ~ FuelPolicy) | ||
</rcode> | </rcode> |
Revision as of 07:32, 19 February 2015
Moderator:Jouni (see all) |
|
Upload data
|
Main message: |
---|
Question:
What are the most beneficial ways from public health point of view to reduce GHG emissions in Kuopio? The target of 40 % GHG reduction seems realistic due to reforms in Haapaniemi power plant, assuming that GHG emissions for wood-based fuel is 0. Life-cycle impacts of the wood-based fuel have not yet been estimated. |
{{#display_map:
62.900223, 27.637482, Kuopio
| zoom = 11
}}
Scope
Question
What are potential climate policies that reach the greenhouse emission targets in the city of Kuopio for years 2010-2030? What are their effects on health and well-being, and what recommendations can be given based on this? The national greenhouse emission target is to reduce greenhouse gas emissions by 20 % between 1990 and 2020; the city of Kuopio has its own, more ambitious target of 40 % for the same time period.
Details of scoping |
---|
Boundaries
Scenarios
Intended users
Participants
|
Answer
Conclusions
The target of 40 % GHG reduction seems realistic due to reforms in Haapaniemi power plant, assuming that GHG emissions for wood-based fuel is 0. Life-cycle impacts of the wood-based fuel have not yet been estimated.
Results
- Calculate building stock into the future
- The dynamics is calculated by adding building floor area at time points greater than construction year, and by subtracting when time point is greater than demolition year. This is done by building category, not individually.
- Also the renovation dynamics is built using event years: at an event, a certain amount of floor area is moved from one energy efficiency category to another.
- Full data are stored in the ovariables. Before evaluating, extra columns and rows are removed. The first part of the code is about this.
Example model run (running the model takes more than 6 min, so use this ready-made result)
Rationale
Dependencies
- Building stock in Kuopio
- Exposure to PM2.5 in Finland
- OpasnetUtils/Drafts
- Energy use of buildings
- Emission factors for burning processes
- Population of Kuopio
- Sanni Väisänen: Greenhouse gas emissions from peat and biomass-derived fuels, electricity and heat — Estimation of various production chains by using LCA methodology ----#: . This work should be carefully read. It may affect conclusions. --Jouni (talk) 13:27, 20 March 2014 (EET) (type: truth; paradigms: science: comment)
Decisions
Obs | Decision maker | Decision | Option | Variable | Cell | Change | Unit | Amount | Description |
---|---|---|---|---|---|---|---|---|---|
1 | Builders | EfficiencyPolicy | BAU | efficiencyShares | Add | 0 | |||
2 | Builders | EfficiencyPolicy | Active efficiency | efficiencyShares | Efficiency:Passive;Time:2020,2025,2030,2035 | Add | fraction | 0.25 | All input must be given in units that are used in respective ovariables. |
3 | Builders | EfficiencyPolicy | Active efficiency | efficiencyShares | Efficiency:Passive;Time:2040,2045,2050 | Add | fraction | 0.1 | |
4 | Builders | EfficiencyPolicy | Active efficiency | efficiencyShares | Efficiency:Low-energy;Time:2020,2025,2030,2035 | Add | fraction | -0.25 | |
5 | Builders | EfficiencyPolicy | Active efficiency | efficiencyShares | Efficiency:Low-energy;Time:2040,2024,2050 | Add | fraction | -0.1 | |
6 | Kuopion Energia | FuelPolicy | BAU | fuelTypes | Add | 0 | |||
7 | Kuopion Energia | FuelPolicy | Biofuel increase | fuelTypes | Burner:Large fluidized bed;Fuel:Wood;Year:2015,2020,2025,2030,2035,2040,2045,2050 | Replace | fraction | 0.495 | |
8 | Kuopion Energia | FuelPolicy | Biofuel increase | fuelTypes | Burner:Large fluidized bed;Fuel:Peat;Year:2015,2020,2025,2030,2035,2040,2045,2050 | Replace | fraction | 0.495 | |
9 | Kuopion Energia | FuelPolicy | Biofuel increase | fuelTypes | Burner:Large fluidized bed;Fuel:Heavy oil;Year:2015,2020,2025,2030,2035,2040,2045,2050 | Replace | fraction | 0.01 | |
10 | Building owner | RenovationPolicy | BAU | renovationRate | Multiply | 1 /a | 1 | ||
11 | Building owner | RenovationPolicy | Active renovation | renovationRate | Multiply | 1 /a | 1.5 | ||
12 | Building owner | RenovationPolicy | Effective renovation | renovationRate | Multiply | 1 /a | 1 | ||
13 | Building owner | RenovationPolicy | Effective renovation | renovationShares | Renovation:Windows | Replace | fraction | 0 | |
14 | Building owner | RenovationPolicy | Effective renovation | renovationShares | Renovation:Technical systems | Replace | fraction | 0 | |
15 | Building owner | RenovationPolicy | Effective renovation | renovationShares | Renovation:Sheath reform | Replace | fraction | 1 | |
16 | Building owner | RenovationPolicy | Effective renovation | renovationShares | Renovation:General | Replace | fraction | 0 | |
17 | Building owner | RenovationPolicy | BAU | renovationShares | Add | fraction | 0 | ||
18 | Building owner | RenovationPolicy | Active renovation | renovationShares | Add | fraction | 0 |
Direct inputs
Obs | Exposure agent | Trait | Cases | DW | L | Description |
---|---|---|---|---|---|---|
1 | PM2.5 | Total mortality | 877 | 1 | 11 | Actually "Mortality (all cause)". In 2009 for Pohjois-Savo area 1090 / 100 000 from death cause registry. |
2 | PM2.5 | Work loss days (WLDs) | 323135 | 0.02 | 0.003 | |
3 | PM2.5 | Restricted activity days (RADs) | 31867 | 0.07 | 0.003 | 2.1 million in whole Finland |
4 | PM2.5 | Infant mortality | 3 | 1 | 81 | <1 year old 2009 data for Pohjois-Savo area 244 / 100 000 from death registry. In 2009 in Kuopio 1110 <1 year olds. |
5 | PM2.5 | COPD | 339 | 0.099 | 15 | Actually "Chronic bronchitis (>15 year olds)". Kelasto, includes astma cases too |
6 | PM2.5 | Cardiovascular hospital admissions (number) | 2109 | 0.253 | 0.017 | 21424 in year 2010 in Kuopio hospital. Hospital serves area with 817166 inhabitats. |
7 | PM2.5 | Respiratory hospital admissions | 1150 | 0.043 | 0.02 | In 2007 1429.55 hospital discharges for respiratory disease / 100 000 in whole Finland. http://data.euro.who.int/hfadb/ |
8 | PM2.5 | Asthma medication use (children aged 5-14) | 62 | 0.043 | 15 | Kelasto |
9 | Mold/dampness | Asthma development (>15 year olds) | 252 | 0.043 | 15 | Kelasto-database |
10 | Mold/dampness | Asthma development (5-14 year olds) | 62 | 0.043 | 15 | Kelasto-database |
11 | Noise | Highly annoyed | 0.02 | 1 | ||
12 | Noise | Sleep disturbance | 0.07 | 1 | ||
13 | Noise | Myocardial infarction | 1289 | 0.439 | 0.019663 | 13101 cases in Kuopio university Hospital in year 2010. Hospital serves area with 817166 inhabitats. |
14 | EC | Cardiovascular mortality | 366 | 0.043 | 0.02 | In 2009 for Pohjois-Savo area 455 / 100 000 from death cause registry. |
15 | Cardiopulmonary | 1 | 11 | Guesswork. The same as total mortality | ||
16 | Lung cancer | 1 | 11 | Guesswork. The same as total mortality. |
Specific actions - real and potential
- Energy production
- New power plant unit in Haapaniemi: ability to use significantly more biomass in the production of district heat (2014)
- Enhancement of dispersed energy production with biofuels
- Wide scale transition to renewable energy sources in heating
- Building stock
- Energy efficiency of buildings is increased: new stricter building regulations in Finland (2/2013)
- Education to building owners and managers: semblance of best practicies in heating and other use of energy. Possible reduction in energy use of building stock is about 10%, and mere beneficial health effects are expected.
- Land use and transport
- If possible, PM emissions and noise are calculated based on updated version of Kuopio´s traffic network
- Alternatively, the effect of increased use of biofuels on GHG and CO2 emissions is evaluated.
- Possibilities of rail traffic in Kuopio
- Other...
Indicators
- Cardiovascular mortality
- Pulmonar mortality
- Well-being...
Who are the stakeholders in the assessment Climate change policies and health in Kuopio and what are their values (i.e., what variables do they want to optimize)? Result is a weight factor for a multi-criteria decision analysis (see e.g. Weighted product model).
Obs | Stakeholder | Variable | Cell | Model | Result | Description |
---|---|---|---|---|---|---|
1 | City of Kuopio | Greenhouse gas emissions in Kuopio | Sector: Total | Weighted sum | 1 | |
2 | Citizens | Greenhouse gas emissions in Kuopio | Sector: Total | Weighted product | 0.5 | |
3 | Citizens | Health impacts of climate policies in Kuopio | Sector: Total | Weighted product | 0.5 | |
4 | Budget office of Kuopio | City budget total | Weighted sum | 1 |
Assessment-specific data
Received
- Building stock data
- Building registry
- Use of electricity by building type or type of activity
- Use of district heat by contract
- Amount of building stock renovated per year
- Amount of new building stock per year during 2010-2012
- Energy consumption in some of city´s own buildings before and after renovation
- Energy production
- Fuels and emissions of Haapaniemi CHP plant
- Traffic
- Regional plan on public transport
To be gathered
- Updated traffic network model?
- Estimates of the amount, area, volume and energy class of new buildings during next years (about 2014-2020)
See also
- Kuopion kaupunginhallitus 8.10.2012: Kuopion ja Siilinjärven joukkoliikennesuunnitelma (Kuopio public transport plan)
- Laskureita hiilijalanjäljen arviointiin ja seurantaan (Carbon footprint calculators): SYNERGIA, JUHILAS, Ilmastodieetti, KASVENER, KUHILAS, Y-HIILARI
- Millaisen tiekarten avulla hiilineutraaliin Suomeen 2050
- Climate policy of Kuopio 2009 - 2020
- DebattiBaari: energiakeskustelu
References
Keywords
Climate Change, Kuopio, Green house gas emissions, Health, Energy
Related files
<mfanonymousfilelist></mfanonymousfilelist>