Air pollution emissions in Helsinki: Difference between revisions
Jump to navigation
Jump to search
(first draft with some code) |
(upbase.upload does not work because problem with samples) |
||
| Line 22: | Line 22: | ||
<rcode name="fuelUse" label="Initiate ovariable fuelUse" embed=1> | <rcode name="fuelUse" label="Initiate ovariable fuelUse" embed=1> | ||
# This is code | # This is code Op_en7923/fuelUse on page [[Air pollution emissions in Helsinki]] | ||
library(OpasnetUtils) | library(OpasnetUtils) | ||
| Line 44: | Line 44: | ||
objects.store(fuelUse) | objects.store(fuelUse) | ||
cat("Ovariable fuelUse stored.\n") | cat("Ovariable fuelUse stored.\n") | ||
</rcode> | |||
<rcode name="emission" label="Initiate ovariable emission" embed=1> | <rcode name="emission" label="Initiate ovariable emission" embed=1> | ||
# This is code | # This is code Op_en7923/emission on page [[Air pollution emissions in Helsinki]] | ||
library(OpasnetUtils) | library(OpasnetUtils) | ||
| Line 53: | Line 54: | ||
dependencies=data.frame( | dependencies=data.frame( | ||
Name=c("fuelUse","emfactor"), | Name=c("fuelUse","emfactor"), | ||
Ident=c(" | Ident=c("Op_en7923/fuelUse","Op_en2791/emfactor") | ||
), | ), | ||
formula = function(...) { | formula = function(...) { | ||
| Line 61: | Line 62: | ||
) | ) | ||
objects.store( | objects.store(emission) | ||
cat("Ovariable emission stored.\n") | cat("Ovariable emission stored.\n") | ||
</rcode> | </rcode> | ||
<rcode name="answer" label=" | <rcode name="answer" label="Upload the answer to database (for developers only)" embed=1 graphics=1 variables=" | ||
name:pagename|type:hidden|default:'{{PAGENAME}}'| | name:pagename|type:hidden|default:'{{PAGENAME}}'| | ||
name:ident|type:hidden|default:'Op_en{{PAGEID}}' | name:ident|type:hidden|default:'Op_en{{PAGEID}}' | ||
"> | "> | ||
# This is code | # This is code Op_en7923/answer on page [[Air pollution emissions in Helsinki]] | ||
library(OpasnetUtils) | library(OpasnetUtils) | ||
library(ggplot2) | |||
objects.latest(" | objects.latest("Op_en7923", code_name="emission") # [[Air pollution emissions in Helsinki]] emission | ||
emission <- EvalOutput(emission) | emission <- EvalOutput(emission) | ||
| Line 83: | Line 85: | ||
ident = ident, | ident = ident, | ||
name = pagename, | name = pagename, | ||
obj_type = "variable", | |||
subset = "Answer", | subset = "Answer", | ||
act_type = "replace", | act_type = "replace", | ||
Revision as of 15:30, 28 November 2018
| Moderator:Nobody (see all) Click here to sign up. |
| This page is a stub. You may improve it into a full page. |
| Upload data
|
Air pollution emissions in Helsinki estimate direct air pollution emissions (including CO2eq) from the Helsinki area.
Question
What are the amounts of air pollution (notably CO2eq and PM2.5) emitted from the Helsinki area (Helsinki specifically but also other municipalities of the Helsinki Metropolitan Area)?