或者你可以使用tibble的rownames_to_column，它做的事情与David的答案相同:

library(tibble)
df <- tibble::rownames_to_column(df, "VALUE")

注意:之前的add_rownames()函数已弃用，并被tibble::rownames_to_column()所取代。

您既可以删除行名，也可以使用setDT及其keep通过引用将它们转换为列(不使用->重新分配内存)。rownames = TRUE参数。表包

library(data.table)
setDT(df, keep.rownames = TRUE)[]
#    rn     VALUE  ABS_CALL DETECTION     P.VALUE
# 1:  1 1007_s_at  957.7292         P 0.004862793
# 2:  2   1053_at  320.6327         P 0.031335632
# 3:  3    117_at  429.8423         P 0.017000453
# 4:  4    121_at 2395.7364         P 0.011447358
# 5:  5 1255_g_at  116.4936         A 0.397993682
# 6:  6   1294_at  739.9271         A 0.066864977

正如@snoram提到的，你可以给新列起任何你想要的名字，例如setDT(df, keep。Rownames = "newname")将添加"newname"作为rows列。

或者你可以使用tibble的rownames_to_column，它做的事情与David的答案相同:

library(tibble)
df <- tibble::rownames_to_column(df, "VALUE")

注意:之前的add_rownames()函数已弃用，并被tibble::rownames_to_column()所取代。

一个单行选项是:

df$names <- rownames(df)

或者，您可以创建一个新的数据帧(或覆盖当前的数据帧，如下例所示)，这样您就不需要使用任何外部包。然而，这种方法对于巨大的数据帧可能不太有效。

df <- data.frame(names = row.names(df), df)

把我的评论移动到上面每个建议的答案:

你不需要额外的包裹，这里有一句话:

d <- cbind(rownames(d), data.frame(d, row.names=NULL))