我必须创建一个图表,表示某些客户如何连接到一个城市的3家商店。
节点是80个客户和3个商店(A,B,C)。
边缘可以将客户链接到商店,其权重表示客户去商店的频率
示例:客户A1在商店A中进行了2次,客户A2在商店A中进行了5次。 然后Node-A1链接到Node-A,权重等于2,而Node-A2的权重等于5。
这个权重的概念对我来说非常重要,我希望 Node-A比Node-A2更接近Node-A2 。
ps:客户节点的ID表示所访问的商店及其排名
对于该图,我使用了这两个文件(节点和边): www.speedyshare.com/4zAff/nodes-comma.csv www.speedyshare.com/wx9mm/edges-comma.csv
library(rgexf)
library(igraph)
g <- graph.data.frame(edges,directed=F)
set.seed(20)
position <- layout.fruchterman.reingold(graph=g,dim=2 ,weights=edges$weight)
position <-cbind(position,rep(0,times=nrow(position))) # create a fake 3rd dimension
plot(position)
write.gexf(nodes=nodes,edges=edges[,1:2], nodesVizAtt=list(position=position), output="foo.gexf")
问题是这个职位根本不相关。
许多只去过商店C的顾客真的很接近商店B. 我的图表出了什么问题?