Population of Finland: Difference between revisions

From Opasnet
Jump to navigation Jump to search
(→‎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

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

+ Show code

Population growth per municipality

Which year (1980-2010)?:

+ Show code

Result

{{#opasnet_base_link:Op_en2949}}


Population of Finland during the H1N1 pandemic and related narcolepsy cluster (~2009-2010?)[1] (See H1N1 vaccination coverage in Finland also)
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

  1. Kansallisen narkolepsiatyöryhmän väliraportti 31.1.2011