r - 将行名更改为相同时，为什么相同的数据框会变得不同

Question

在玩一些数据帧时，我遇到了一个奇怪的行为：当我创建两个相同的数据帧a,b，然后交换它们的行名时，它们的结果并不相同：

rm(list=ls())

a <- data.frame(a=c(1,2,3),b=c(2,3,4))
b <- a
identical(a,b)
#TRUE

identical(rownames(a),rownames(b))
#TRUE

rownames(b) <- rownames(a)

identical(a,b)
#FALSE

谁能重现/解释为什么？

Answer 1

诚然，这有点令人困惑。从我们开始，?data.frame我们看到：

如果 row.names 提供为 NULL 或未找到合适的组件，则行名是从 1 开始的整数序列（并且此类行名被认为是“自动的”，而不是由 as.matrix 保留）。

所以最初a，b每个都有一个名为row.names整数的属性：

> str(attributes(a))
List of 3
 $ names    : chr [1:2] "a" "b"
 $ row.names: int [1:3] 1 2 3
 $ class    : chr "data.frame"

但rownames()返回一个字符向量（dimnames()实际上是一个字符向量列表，在后台调用）。因此，在重新分配行名后，您最终会得到：

> str(attributes(b))
List of 3
 $ names    : chr [1:2] "a" "b"
 $ row.names: chr [1:3] "1" "2" "3"
 $ class    : chr "data.frame"