假设我正在创建如下的有向图
a = sample(state.name, 10)
b = sample(state.name, 10)
c = sample(state.name, 10)
d = data.frame(a,b,c)
d1 = as.matrix(d)
edges1 = rbind(d1[,1:2],d1[,2:3])
g = graph.data.frame(edges1, directed=F)
adj <- as.matrix(get.adjacency(g))
g2 <- new("graphAM", adjMat=adj, edgemode="directed")
plot(g2, attrs = list(graph = list(rankdir="LR"),
node = list(fillcolor = "lightblue")))
我得到一个非常丑陋的图表,节点大小和节点文本非常不成比例。 (抱歉没有足够的功劳来发布图表的图像)
我尝试了node.size和V(g).size参数,但它没有用。有什么建议吗?