Greenhouse gas emissions in Finland: Difference between revisions
Jump to navigation
Jump to search
(placeholder) |
mNo edit summary |
||
(3 intermediate revisions by 2 users not shown) | |||
Line 1: | Line 1: | ||
[[Category:Climate change]] | [[Category:Climate change]] | ||
[[Category:Energy]] | [[Category:Energy]] | ||
[[Category:Code under inspection]] | |||
{{variable|moderator=Jouni|stub=Yes}} | {{variable|moderator=Jouni|stub=Yes}} | ||
Line 17: | Line 18: | ||
=== Formula === | === Formula === | ||
<rcode graphics="1"> | |||
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") | |||
</rcode> | |||
{{comment|# |Code seems to work, but gives the yellow errorbox.|--[[User:Heta|Heta]] 12:39, 27 August 2013 (EEST)}} | |||
==See also== | ==See also== | ||
Line 37: | Line 68: | ||
| urn = | | urn = | ||
| reference = | | reference = | ||
}} | }}<!-- __OBI_TS:1347361909 --> |
Latest revision as of 09:39, 27 August 2013
Moderator:Jouni (see all) |
This page is a stub. You may improve it into a full page. |
Upload data
|
Question
What are greenhouse gas emissions in Finland?
Answer
Rationale
Data from Tilastokeskus [1]
Dependencies
Formula
----#: . Code seems to work, but gives the yellow errorbox. --Heta 12:39, 27 August 2013 (EEST) (type: truth; paradigms: science: comment)
See also
Keywords
References
Related files
<mfanonymousfilelist></mfanonymousfilelist>