将 2 列中的所有唯一值收集到一个新列中

Question

我有一个包含网络中所有节点连接的数据框，我想创建一个名为“节点”的新数据框，其中包含所有唯一节点。 我正在尝试做类似的事情

eids<-as.factor(d$from)
mids<-as.factor(d$to)
nodes<-data.frame(c(eids,mids))
nodes<-unique(nodes)

但是当我尝试创建图形时，我得到： Some vertex names in edge list are not listed in vertex data frame ，这意味着此方法遗漏了我的部分数据。 我的数据集非常大，所以我在这里放了一个玩具数据集。

from<-c(2,3,4,3,1,2)
to<-c(8,8,7,5,6,5)
d<-data.frame(from,to)

Answer 1

首先，为了解决您的问题，您可以使用unique(stack(d)[1])来获取一列值为 1 到 8 的数据框。

---

我在这里解释为什么你的代码不起作用。 使用c()组合因子类的对象是危险的。 您可以尝试以下示例：

(x <- factor(c("A", "B", "C", "D")))
# [1] A B C D
# Levels: A B C D

(y <- factor(c("E", "F", "G", "H")))
# [1] E F G H
# Levels: E F G H

c(x, y)
# [1] 1 2 3 4 1 2 3 4

实际上，因子对象基于数字数据，而不是字符。 你可以去掉它的类，发现它属于一个具有名为levels属性的数字向量：

unclass(x)
# [1] 1 2 3 4
# attr(,"levels")
# [1] "A" "B" "C" "D"

数字部分表示级别的索引。 因子对象实际上就像记录其级别的索引一样。