Skip to content

Instantly share code, notes, and snippets.

@antagomir
Created February 11, 2012 13:53
Show Gist options
  • Save antagomir/1799513 to your computer and use it in GitHub Desktop.
Save antagomir/1799513 to your computer and use it in GitHub Desktop.
Hakuesimerkki: HSY Vaestoruudukko
library(sorvi)
sp <- GetHSY("Vaestoruudukko") # Hae HSY:n Vaestoruudukko-data
df <- as.data.frame(sp) # Tutki aineiston sisaltoa
at <- c(seq(0, 2000, 250), Inf)
q <- PlotShape(sp, "ASUKKAITA", type = "oneway", at = at, ncol = length(at)) # Piirra kuva
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment