Greenhouse gas emissions in Finland: Difference between revisions

Latest revision as of 09:39, 27 August 2013

This page is a knowledge crystal of subtype variable. The page identifier is Op_en5806
Moderator:Jouni (see all)
This page is a stub. You may improve it into a full page.
Upload data {{#opasnet_base_link:Op_en5806}}

Question

What are greenhouse gas emissions in Finland?

Answer

Rationale

Data from Tilastokeskus [1]

Dependencies

Formula

+ Show code - Hide code

library(OpasnetUtils)
library(ggplot2)
library(xtable)

data <- tidy(op_baseGetData("opasnet_base", "Op_en5806"), objname = "emission")
colnames(data)[colnames(data) == "Emission category"] <- "Emission"
data$Year <- as.numeric(as.character(data$Year))
data <- data[substr(data$Emission, 1, 1) != "5" , ]

print(xtable(data[data$Year == 2010, ]), type = 'html')

S <- 20
ggplot(data, aes(x = Year, y = emissionResult, group = Emission)) + 
	geom_line() + 
	opts(
		axis.text.x = theme_text(size = S), 
		axis.text.y = theme_text(size = S), 
		axis.title.x = theme_text(size = S),
		axis.title.y = theme_text(size = S, angle = 90), 
		title = "Greenhouse gas emissions in Finland", 
		plot.title = theme_text(size = S * 1.5)
	) + 
	scale_x_continuous("Time") + 
	scale_y_continuous("kton/a (CO2 equivalent")

----#: . Code seems to work, but gives the yellow errorbox. --Heta 12:39, 27 August 2013 (EEST) (type: truth; paradigms: science: comment)

Keywords

References

Related files

Greenhouse gas emissions in Finland. Opasnet . [2]. Accessed 24 Nov 2024.

@@ Line 1: / Line 1: @@
 [[Category:Climate change]]
 [[Category:Energy]]
+[[Category:Code under inspection]]
 {{variable|moderator=Jouni|stub=Yes}}
@@ Line 45: / Line 46: @@
 </rcode>
+{{comment|# |Code seems to work, but gives the yellow errorbox.|--[[User:Heta|Heta]] 12:39, 27 August 2013 (EEST)}}
 ==See also==
@@ Line 65: / Line 68: @@
 | urn            =
 | reference      =
-}}<!-- __OBI_TS:1347344710 -->
+}}<!-- __OBI_TS:1347361909 -->