R语言DataFrame列名修改后未在数据框中完全显示问题求助

这个现象的核心原因是赋值操作将第四列隐式转换成了一维矩阵，导致打印数据框时显示的是矩阵自身的列名，而非数据框的顶层列名。

具体过程拆解 #

1. 初始阶段，var_tab[4] <- "three"给数据框新增第四列，默认列名为V4，此时该列是普通的字符向量（或因子）列。
2. 执行var_tab[4] <- ifelse(var_tab[4] == var_tab[3], 1, 0)时，ifelse返回数值向量，而用单括号[对数据框列赋值时，若原列是因子/字符类型，替换为数值向量会触发R的隐式转换：将该列存储为1列的矩阵，而非普通向量列。这个矩阵自身保留了原列名V4作为其内部的dimnames。
3. 后续修改colnames(var_tab)[4] <- "base"时，仅更新了数据框的顶层列名，但矩阵列自身的dimnames并未同步修改。因此打印数据框时，R会优先显示矩阵列自带的名字V4，而colnames()查询的是数据框的顶层列名，所以显示的是修改后的base。

验证方法 #

执行完赋值操作后，用str(var_tab)查看数据结构，能清晰看到第四列的类型是矩阵：

str(var_tab)
# 'data.frame':	4 obs. of  4 variables:
#  $ coef: int  1 2 3 4
#  $ p   : num  0.1 0.1 0.1 0.1
#  $ c("one", "two", "three", "four"): chr  "one" "two" "three" "four"
#  $ V4  : num [1:4, 1] 0 0 1 0
#   ..- attr(*, "dimnames")=List of 2
#   .. ..$ : NULL
#   .. ..$ : chr "V4"

规避方法的逻辑 #

先重命名列名再赋值时，var_tab[4] <- ifelse(...)是对已命名的普通向量列进行内容替换，R不会将其转换为矩阵。此时列的类型保持为普通数值向量，打印时直接显示数据框的顶层列名。

内容的提问来源于stack exchange，提问作者Chris Grady