Λέσχη Φίλων Στατιστικής - GrStats forum
Χαρτης της επικρατειας Forumgrstats

Join the forum, it's quick and easy

Λέσχη Φίλων Στατιστικής - GrStats forum
Χαρτης της επικρατειας Forumgrstats
Λέσχη Φίλων Στατιστικής - GrStats forum
Would you like to react to this message? Create an account in a few clicks or log in to continue.
Για προβλήματα εγγραφής και άλλες πληροφορίες επικοινωνήστε με : grstats.forum@gmail.com ή grstats@stat-athens.aueb.gr

Go down
mp83
mp83
Posts : 67
Join date : 2009-11-10
Location : Athens
http://statsravingmad.com/blog

Χαρτης της επικρατειας Empty Χαρτης της επικρατειας

Sat 19 Dec 2009 - 13:42
Λογικά, καποτε θα το χρειαστει κάποιος, π.χ σε εταιρεια δημοσκοπήσεων (Sleep Sleep χα,χα!)

library(sp)
library(RColorBrewer)

tt <- url("http://gadm.org/data/rda/GRC_adm2.RData") #τα δεδομενα για να χαραξουμε νομούς
print(load(tt))
close(tt)
ss=length(levels(gadm$NAME_2))
spplot(gadm, "NAME_2", main="Hellas",
colorkey = FALSE, lwd=.5, col="grey",col.regions=rainbow(ss))
Συγκρινετε με το R-base
map("world2", regions=c("Greece"), lwd=0.1, fill=TRUE, col="white")
avatar
statlink
Posts : 39
Join date : 2009-11-05
Age : 36
Location : Nottingham
http://statlink.tripod.com

Χαρτης της επικρατειας Empty Re: Χαρτης της επικρατειας

Sun 21 Feb 2010 - 19:44
Gamato, super wow
mp83
mp83
Posts : 67
Join date : 2009-11-10
Location : Athens
http://statsravingmad.com/blog

Χαρτης της επικρατειας Empty Re: Χαρτης της επικρατειας

Sun 21 Feb 2010 - 22:21
Thanx!
avatar
statlink
Posts : 39
Join date : 2009-11-05
Age : 36
Location : Nottingham
http://statlink.tripod.com

Χαρτης της επικρατειας Empty Re: Χαρτης της επικρατειας

Wed 17 Mar 2010 - 15:34
exw kai afto apo ti vivliothiki mesa tis R
loc <- cmdscale(eurodist)
x <- loc[,1]
y <- -loc[,2]
plot(x, y, type="n", xlab="", ylab="", main="cmdscale(eurodist)")
text(x, y, rownames(loc), cex=0.8 )
Back to top
Permissions in this forum:
You cannot reply to topics in this forum