igraph使用问题，求助！

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

代码如下：
library(igraph)

library(xlsx)
WindowPhone<-"/Users/whiskey/Desktop/data/WindowPhone.xlsx"
mydataframe<-read.xlsx(WindowPhone,1)
g <- graph.data.frame(mydataframe)

is.simple(g)
gg = simplify(g)
is.simple(gg)
dg = degree(gg)
gg = subgraph(gg, which(dg > 0) - 1)

com = walktrap.community(gg, steps = 5)
subgroup = split(gg$a, gg$r)
## subgroup
V(gg)$sg = com$membership + 1
V(gg)$color = rainbow(max(V(gg)$sg))[V(gg)$sg]
## png("net_walktrap.png", width = 500, height = 500)
par(mar = c(0, 0, 0, 0))
set.seed(14)
plot(gg, layout = layout.fruchterman.reingold, vertex.size = 5,
    vertex.color = V(gg)$color, vertex.label = NA, edge.color = grey(0.5),
    edge.arrow.mode = "-")
## dev.off()


然而出现了错误：

Error in split.default(gg$a, gg$r) : 第一引数必须是向量


请问大神如何修改？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：GRAPH GRAP APH RAP Library library

顶！