lunes, 23 de abril de 2012

Redes sociales con R

Con el software R, pueden dibujarse redes sociales o sociogramas. Atrévase a ir más allá del Word y del Excel y flirtee con R y Lyx.

R, dispone de un paquete llamado “Network” que permite tratar los datos como si fueran redes. Una vez se descubre como, es fácil.

Aquí añado un ejemplo más y su resultado.


#***************************
#* Ejemplo en R de una red *
#***************************
#****Llamamos a la librería
library(network)
#****Introcucimos el vector de datos
t<-c(0,3,5,0,0,0,0,0,0,0,4,1,0,0,0,3,3,1,0,0,2,15,0,0,0)
#****Creamos una matriz de adyacencia, que es una matriz cuadrada qeu representa relaciones binarias (quien se 
 
relaciona con quien)
tt<-matrix(t,ncol=5,byrow=TRUE)
#****Transformamos la matriz en una red
ttz<-network(tt)
#****Definimos los nombres de los vértices
network.vertex.names(ttz)<-c("Kasi","Hermes","Monika","Yani","Francoise")
#****Hacemos un vector con los pesos, OJO! Estan tomados a partiz de la matriz en vertical
peso<-c(4,3,2,3,1,3,15,5,1)
#****Dibujamos la red ttz
png("redamenaza.png")
plot.network(ttz,label = network.vertex.names(ttz),label.cex=0.9,edge.lwd=peso,arrowhead.cex=2,main="Amenaza")
dev.off()
#**************************
#****Nombre de las etiquetas: label = network.vertex.names(ttz)
#****Tamaño del texto de las etiquetas: label.cex=1.5,
#****Grueso de las lineas (es el del vector "peso": edge.lwd=peso,
#****Tamaño de las puntas de las flexas: arrowhead.cex=2)
Created by Pretty R at inside-R.org

No hay comentarios: