小编Dra*_*aic的帖子

我有一个与此类似的问题：Reading adjacencylists withisolatednodesusingigraph

我想绘制一些没有关系的节点。但由于某种原因，上面线程中提到的解决方案不起作用

我的数据

data <- data.frame(ID = c(143918,176206,210749,219170,247818,314764,321459,335945,339637,700689,712607,712946,735907,735907,735907,735907,735907,735907,735908,735908,735908,735908,735908,735908,735910,735911,735912,735913,746929,746929,747540,755003,767168,775558,776656,794173,794175,807493), relation = c(111098,210749,176206,NA,NA,NA,NA,NA,NA,807493,NA,NA,735908,735910,735911,735912,735913,767168,735907,735910,735911,735912,735913,767168,NA,NA,NA,NA,NA,100723,NA,NA,NA,776656,775558,NA,NA,700689))

这应该会生成一个还显示孤立节点的图：

v<-unique(data[,1])
e <- na.omit(data)

g<-graph.data.frame(e, vertices = v, directed = T)
plot(g)

由于某种原因，我收到错误：“边列表中的某些顶点名称未在顶点数据框中列出”。

我希望有人能告诉我我做错了什么以及如何解决这个问题。谢谢

编辑：paqmo 回答我的问题，谢谢！

然而我的任务需要不同的方法。有关系但在第一行中缺失的 ID 是位于不同位置的人。这些应该被省略，同时保留第一排的每个孤立的人。我的解决方案目前使用 data.table ：

v <- unique(c(data[,1]))
v <- as.data.frame(v)
e <- data
setDT(v);setDT(e)
setkey(v)
setkey(e, relation)
e <- e[v]
e <- na.omit(e)
g<-graph.data.frame(e, vertices = v, directed = T)
plot(g)

欢迎任何关于更好/更有效的解决方案的建议。