Population of Finland: Difference between revisions
Jump to navigation
Jump to search
m (→Formula) |
(→Formula: soRvi Population growth added) |
||
Line 34: | Line 34: | ||
=== Formula === | === Formula === | ||
'''Total population in Finland | |||
<rcode> | <rcode> | ||
Line 42: | Line 44: | ||
pop <- data.frame(Age,Result) | pop <- data.frame(Age,Result) | ||
pop | pop | ||
</rcode> | |||
'''Population growth per municipality | |||
<rcode graphics="1" variables=" | |||
name:year|description:Which year (1980-2010)?|default:2010"> | |||
# (C) 2011 Leo Lahti <leo.lahti[at]iki.fi> All rights reserved. | |||
# License: FreeBSD, http://en.wikipedia.org/wiki/BSD_licenses | |||
# Tama esimerkki on testattu sorvi-paketin versiolla 0.1.23 | |||
# Esimerkki Suomen kuntatason vaestonkasvutilastojen (Tilastokeskus) | |||
# visualisoinnista Maanmittauslaitoksen karttadatalla (vuonna 2010) | |||
# Lataa kirjastoja | |||
library(sorvi) | |||
library(OpasnetBaseUtils) | |||
############################################### | |||
# Lue Suomen kuntarajat SpatialPolygon-muodossa | |||
# (C) Maanmittauslaitos 2011 | |||
# http://www.maanmittauslaitos.fi/aineistot-palvelut/digitaaliset-tuotteet/ilmaiset-aineistot/hankinta | |||
data(MML) | |||
sp <- MML[["1_milj_Shape_etrs_shape"]][["kunta1_p"]] | |||
################################################# | |||
# Lue kuntatason vaestonkasvutiedot tilastokeskuksen StatFin-tietokannasta | |||
# http://www.stat.fi/tup/statfin/index.html | |||
# PC Axis-muodossa | |||
px <- statfin.px("vrm/synt/080_synt_tau_203_fi.px") | |||
# statfin.px-funktio käyttää soRvin read.px-funktiota hakemaan dataa URLista, joka alkaa "http://pxweb2.stat.fi/database/StatFin/" | |||
# URLin loppuosa pitää antaa statfin.px:lle parametrina. | |||
# Poimi taulukosta halutut tiedot | |||
pxs <- subset(as.data.frame(px), Väestönmuutos.ja.väkiluku == "Luonnollinen väestönlisäys" & Vuosi == year) | |||
# Putsaa data | |||
vaestonkasvu <- preprocess.px(pxs) | |||
################################################ | |||
# Lisaa tiedot karttaobjektiin | |||
sp@data$vaestonkasvu <- vaestonkasvu$dat[match(sp$Kunta.FI, vaestonkasvu$Alue)] | |||
# Korvaa puuttuvat arvot nollalla | |||
sp[["vaestonkasvu"]][is.na(sp[["vaestonkasvu"]])] <- 0 | |||
################################################ | |||
# Maarittele varipaletti | |||
my.palette <- colorRampPalette(c("blue", "white", "red"), space = "rgb") | |||
ncol <- 40 # Number of colors | |||
################################################# | |||
# Piirra kuva | |||
varname <- "vaestonkasvu" | |||
int <- max(abs(sp[[varname]])) | |||
q <- spplot(sp, varname, | |||
col.regions = my.palette(ncol), | |||
main = paste("Population growth ", year, sep=""), | |||
colorkey = TRUE, | |||
lwd = .4, | |||
col = "black", | |||
at = seq(0 - int, 0 + int, length = ncol) | |||
) | |||
print(q) | |||
</rcode> | </rcode> | ||
Revision as of 05:18, 21 November 2011
Moderator:Virpi Kollanus (see all) |
|
Upload data
|
Scope
Describes the population number in Finland.
Dimensions and boundaries
- Time
- Year 2009
- Year 2030
- Spatial
- 250*250 m grids?
- Age
- 1-year interval
- Gender
- Male
- Female
Definition
Data
Causality
Unit
Persons
Formula
Total population in Finland
Population growth per municipality
Result
{{#opasnet_base_link:Op_en2949}}
Age group | Population |
---|---|
0-4 | 298114 |
5-9 | 287786 |
10-14 | 302423 |
15-19 | 334636 |
20-24 | 324472 |
25-29 | 344634 |
30-34 | 337970 |
35-39 | 310768 |
40-44 | 358754 |
45-49 | 378341 |
50-54 | 378037 |
55-59 | 388165 |
60-64 | 396886 |
65-69 | 258319 |
70-74 | 225043 |
75-79 | 179671 |
80- | 247408 |
All | 5351427 |
See also
Population 2008 with one year intervals male/female, excel sheet
www.stat.fi -> PX Web database
References
- ↑ Kansallisen narkolepsiatyöryhmän väliraportti 31.1.2011