我有一个矩阵如下:
jerry peter king
jerry 1 0 0
peter 0 1 0
king 1 1 1
现在我正尝试用以下代码绘制代表矩阵的图形:
t <- read.table("../data/table.dat");
adjm <- data.matrix(t);
g1 <- graph.adjacency(adjm,add.colnames=NULL);
plot(g1, main="social network", vertex.color="white", edge.color="grey", vertex.size=8,
vertex.frame.color="yellow");
顶点的标签是id,所以我的问题是如何通过矩阵的dimnames设置顶点的标签? 我已经尝试过以下代码:
vertex.label=attr(adjm,"dimnames")
但是得到了错误的图表。