16

我有一个看起来像这样的数据框：

> mydf
                   val1     val2
hsa-let-7a         2.139890 -0.03477569
hsa-let-7b         2.102590  0.04108795
hsa-let-7c         2.061705  0.02375882
hsa-let-7d         1.938950 -0.04364545
hsa-let-7e         1.889000 -0.10575235
hsa-let-7f         2.264296  0.08465690

请注意，从 3 列中，只有第 2 和第 3 列是名称。我想要做的是命名第一列（加上重命名第二和第三）。

但是为什么这个命令失败了？

colnames(mydf) <- c("COL1","VAL1","VAL2");

正确的方法是什么？

它给了我：

Error in `colnames<-`(`*tmp*`, value = c("COL1", "VAL1", "VAL2" :
  'names' attribute [3] must be the same length as the vector [2]
4

3 回答 3

25

您可以将行名称加入数据框，如下所示：

mydf <- cbind(rownames(mydf), mydf)
rownames(mydf) <- NULL
colnames(mydf) <- c("COL1","VAL1","VAL2")

或者，一步：

setNames(cbind(rownames(mydf), mydf, row.names = NULL), 
         c("COL1", "VAL1", "VAL2"))
#         COL1     VAL1        VAL2
# 1 hsa-let-7a 2.139890 -0.03477569
# 2 hsa-let-7b 2.102590  0.04108795
# 3 hsa-let-7c 2.061705  0.02375882
# 4 hsa-let-7d 1.938950 -0.04364545
# 5 hsa-let-7e 1.889000 -0.10575235
# 6 hsa-let-7f 2.264296  0.08465690
于 2013-04-16T07:19:49.003 回答
3

这也可能适用于您的情况，

mydf <- cbind(rownames(mydf),mydf)
rownames(mydf) <- NULL
colnames(mydf) <- c(names(mydf)) #to not write all the column names

colnames(mydf)[1] <- "name.of.the.first.column" 
names(mydf)
于 2020-05-14T15:11:30.280 回答
1

如果有人想tidyverse在他/她的管道中使用解决方案，这可行

rownames_to_column(mydf, var = "var_name")

该功能包含在tibble包中

于 2020-05-14T15:19:15.057 回答