Posts Tagged ‘r’

Wektorowa mapa polski

18 września, 2009

Niby miałem pisac o sieciach społecznych i internecie, ale obecnie w pracy muszę rozprawic się ze statystyką geograficzną i produkowac mapy polski z różnymi wskaźnikami. Strasznie długo szukałem darmowej mapy wektorowej polski i oczywiście nie mogłem znalexc. Wszyscy mówili – zapłac. A ja jestem z UW i oczywiście nie mam pieniędzy;)

Ale znalazłem darmowe mapy Polski, które łatwo dają się wklejac do R – to projekt DIVA GIS z własnym programem, którym również można się fajnie bawic. Polecam! Polska jest bardzo ładnie zrobiona.

mapa

pośredniczenie krawędzi

8 września, 2009

Jak ładnie zwizualizowac pośredniczenie krawędzi w igraphie w R dla pliku my.mat – czystej macierzy

raw.data<-read.table(„my.mat”,header=FALSE, sep=” „)
mat<-as.matrix(raw.data)
library(igraph)

edgelist<-data.frame(od=0,do=0,ile=0)
e.count=0;
for(i in 1:dim(mat)[1]){
for(j in 1:dim(mat)[2]){
if(mat[i,j]>0){
e.count<-(e.count+1);
edgelist[e.count,1]<-i;
edgelist[e.count,2]<-j;
edgelist[e.count,3]<-mat[i,j];
}
}
}

my.net<-graph.data.frame(edgelist, directed=TRUE, vertices=NULL)
posr<-edge.betweenness(my.net)

E(my.net)$edgb<-posr
E(my.net)$color<-„grey”
E(my.net)$width<-posr/100
E(my.net)[edgb > 1000]$color<-„red”
tkplot(my.net)
coords<-layout.kamada.kawai(my.net,dim=3)
rglplot(my.net,layout=coords)

efekt:

pol_edge_bet_3d