Difference between revisions of "Energy consumption of heating of buildings in Kuopio"

Revision as of 10:43, 29 January 2013

Scope

To minimize the use of energy for heating inside the building by using other insulating materials

Question

What are the energy sources and their amounts used for heating the buildings in Kuopio?

Intended use and users

• City of kuopio
• Citizens
• Energy companies
• Environmental agency

Participants

• city of kuopio
• Energy companies
• Environmental Agency

Scenarios

• Use of insulating materials in the building design
• Use of renewable energy resources
• Efficient use of energy

Analyses

Answer

Result

This code gets the ovariable of this page and calculates some basic results.

Conclusion

The best suitable way of reducing energy consumption in the buildings is by the use of insulating material like .........

Rationale

Endpoints

• city of Kuopio

Interested in sustainable use of energy to minimize the enrgy costs

• citizens

By utilizing energy efficiently

• Energy companies

They have to spend less amount of money to produce energy

Endpoints

Variables

library(OpasnetUtils) # A package with Opasnet functionalities
library(xtable)       # A package with table formats
library(ggplot2)      # A package with fancy graph formats

objects.latest("Op_en5699", "calculations") # Get the latest ovariables from code calculations on page Op_en5699.

heatingEnergyKuopio <- EvalOutput(heatingEnergyKuopio)

print(xtable(heatingEnergyKuopio@output), type = 'html') # Show a result table

ggplot(heatingEnergyKuopio@output, # Show a bar chart
	aes(x = Energy_source, y = heatingEnergyKuopioResult, fill = Year)) +
	geom_bar(position="dodge") + 
	theme_grey(base_size = 24)

Default run

Rationale

Data

Benviroc Oy, Kuopion kasvihuonepäästöt 2008-2010, CO2-raportti

Dependencies

None described.

Calculations

This code defines and stores the ovariable of this page (heatingEnergyKuopio).

library(OpasnetUtils)
library(xtable)

heatingEnergyKuopio <- Ovariable("heatingEnergyKuopio", ddata = "Op_en5699", getddata = FALSE, save = TRUE) 

cat("Ovariable heatingEnergyKuopio saved for later use. Page name: Op_en5699, code name: calculations\n")

print(xtable(EvalOutput(heatingEnergyKuopio)@output), type = "html")

Default run

See also

Keywords

References

Related files

<mfanonymousfilelist></mfanonymousfilelist>