我想将列名转换为 R 中的标识列

Question

嘿伙计们，我对 R 很陌生，所以如果这是一个愚蠢的问题，我深表歉意。 我有一个如下所示的数据框：

Gelatin Geltrex Combo Control
1   0.761   0.732 0.557   0.723
2   0.704   0.712 0.764   0.540
3   0.580   0.435 0.351   0.537

我想以 2 列结束； 一行中的数字和另一列中的当前列名作为数字的标识符？

Answer 1

如果我们需要行/列索引，我们可以使用row和col来获取行/列索引并使用data.frame创建一个新数据集。

df2 <- data.frame(Row= c(row(df1)), 
               Col=names(df1)[col(df1)], stringsAsFactors=FALSE)

---

或者另一种选择是从library(reshape2) melt 。 我们将 'data.frame' 转换为 'matrix' 并melt得到行/列名称作为前两列。

library(reshape2)
melt(as.matrix(df1))[-3]

编辑：如果我们需要value和列名作为两列，只需像@thelatemail 提到的那样melt或使用stack

melt(df1)

或从base R stack

stack(df1)

Answer 2

也许您可以使用 tidyr 包中的收集

> library(tidyr)
> df = data.frame(a = c(1,2,3), b = c(4,5,6), d = c(7, 8, 9))
> newdf = gather(df, columnNames, values)

  columnNames values
1           a      1
2           a      2
3           a      3
4           b      4
5           b      5
6           b      6
7           d      7
8           d      8
9           d      9