我有一个这样的数据框:
df
VALUE ABS_CALL DETECTION P-VALUE
1007_s_at "957.729231881542" "P" "0.00486279317241156"
1053_at "320.632701283368" "P" "0.0313356324173416"
117_at "429.842323161046" "P" "0.0170004527476119"
121_at "2395.7364289242" "P" "0.0114473584876183"
1255_g_at "116.493632746934" "A" "0.39799368200131"
1294_at "739.927122116896" "A" "0.0668649772942343"
我想将行名转换为第一列。目前我使用这样的方法将行名作为第一列:
d <- df
names <- rownames(d)
rownames(d) <- NULL
data <- cbind(names,d)
有没有一条线可以做到这一点?
或者您可以使用tibble
的rownames_to_column
,它的作用与David的答案相同:
library(tibble)
df <- tibble::rownames_to_column(df, "VALUE")
注意:以前的函数add_rownames()
已被弃用,取而代之的是tibble::rownames_to_column()
您可以删除行名称并通过引用将它们转换为列(无需使用重新分配内存-
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,保留. rowname="newname")
会将"newname"添加为行列。
一行选项是:
df$names <- rownames(df)