R
我使用数据框Diff
和邻接矩阵创建了一个 igraph 图,adjacency
并希望layout.mds
以Cytoscape
. 我怎么可能做到这一点?
数据框如下:
差异:
0.0 0.1 0.2 0.3 0.4
0.1 0.0 0.5 0.6 0.7
0.2 0.5 0.0 0.8 0.9
0.3 0.6 0.8 0.0 1.0
0.4 0.7 0.9 1.0 0.0
邻接:
0 1 1 0 0 0
0 0 0 1 1 0
0 1 0 0 1 0
0 0 0 0 0 1
1 0 0 1 0 0
以下是用于获取绘图的代码:
data <- Diff
library(igraph)
graph <- graph.full(nrow(data))
layout <- layout.mds(graph, dist=as.matrix(data), dim=3)
edge <- graph.adjacency(as.matrix(adjacency),mode="directed")
plot(edge, layout=layout)