Difference between revisions of "Outdoor air temperature in Finland"
From Testiwiki
(updated to match Helsinki energy decision 2015 data needs) |
|||
Line 1: | Line 1: | ||
− | {{variable|moderator = | + | {{variable|moderator=Jouni}} |
− | |||
[[Category: CLAIH]] | [[Category: CLAIH]] | ||
− | == | + | == Question == |
− | + | What are the outdoor air temperatures in Finland previously, now and in the future in different climate areas? | |
− | + | == Answer == | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | == | + | == Rationale == |
− | + | Data from Statistics Finland: | |
+ | * [http://ilmatieteenlaitos.fi/energialaskennan-testivuodet-nyky Current temperature, wind, and solar radiation] | ||
+ | * [http://ilmatieteenlaitos.fi/energialaskennan-testivuodet-tulevaisuuden-ilmastossa Future temperature, wind, and solar radiation] | ||
+ | * The data contains the following parameters: Timestep Year Month Day Time Temperature(°C) Relative_humidity(%) Wind_direction(degrees) Wind_speed(m/s) Direct_normal_solar_radiation(W/m2) Diffuse_horisontal_radiation(W/m2) Global_horisontal_radiation(W/m2) | ||
− | + | === Calculations === | |
− | |||
− | |||
− | |||
− | = | + | <rcode embed=0> |
+ | ## This is code is Op_en2959/temperatures [[Outdoor air temperature in Finland]] | ||
+ | library(OpasnetUtils) | ||
− | + | ta <- opbase.data("Op_en2959", subset = "Vantaa") # [[Outdoor air temperature in Finland]] | |
− | + | hours <- as.character(ta$Date) | |
− | |||
− | == | + | hours <- as.POSIXct(strptime(hours, format = "%Y-%b-%d %H:%M:%S")) |
+ | hours <- hours + as.difftime(as.character(ta$Time), format = "%H:%M") | ||
− | + | # Adjust temperature data: 2.3 C is the average difference between Kuopio and Helsinki | |
+ | hours <- data.frame(Time = hours, Result = as.numeric(as.character(ta$Result)) + 2.3) | ||
+ | hours <- hours[!is.na(hours$Result) , ] | ||
+ | hours$Date <- as.POSIXct(strptime(format(hours$Time, "%Y-%m-%d"), format = "%Y-%m-%d")) | ||
+ | hours <- hours[hours$Time >= as.POSIXct("2014-03-01 00:00:00") & hours$Time < as.POSIXct("2015-03-01 00:00:00") , ] | ||
− | === | + | days <- aggregate(hours["Result"], hours["Date"], FUN = mean) |
+ | days$Temperature <- cut(days$Result, breaks = seq(-30, 33, 3)) | ||
+ | temperatures <- Ovariable("temperature", data = aggregate(days["Result"], days["Temperature"], FUN = mean)) | ||
+ | temperdays <- Ovariable("temperdays", data = aggregate(days["Result"], days["Temperature"], FUN = length)) | ||
− | + | objects.store(temperatures, temperdays) | |
− | + | cat("Objects temperature, temperdays stored.\n") | |
− | == Result == | + | #ggplot(hours, aes(x = Time, y = Result))+geom_line() + geom_point(data = days, aes(x = Date, y = Result, colour = "Daily mean", size = 2)) |
+ | #ggplot(hours, aes(x = Time, y = Result))+geom_point() | ||
+ | </rcode> | ||
− | |||
==See also== | ==See also== | ||
*[[CLAIH assessment]] | *[[CLAIH assessment]] | ||
+ | |||
+ | {{Helsinki energy decision}} | ||
==References== | ==References== | ||
− | + | <references/> | |
− | |||
− | + | == Related files == |
Revision as of 13:00, 11 October 2015
This page is a variable.
The page identifier is Op_en2959 |
---|
Moderator:Jouni (see all) |
Give your opinion to the peer rating of the content of this page. |
Upload data
|
Question
What are the outdoor air temperatures in Finland previously, now and in the future in different climate areas?
Answer
Rationale
Data from Statistics Finland:
- Current temperature, wind, and solar radiation
- Future temperature, wind, and solar radiation
- The data contains the following parameters: Timestep Year Month Day Time Temperature(°C) Relative_humidity(%) Wind_direction(degrees) Wind_speed(m/s) Direct_normal_solar_radiation(W/m2) Diffuse_horisontal_radiation(W/m2) Global_horisontal_radiation(W/m2)
Calculations
See also
Template:Helsinki energy decision
References