重塑数据框

Question

我有一个下面给出的数据集。数据集有4列c1，c2，c3，c4。

c1  c2  c3  c4
x   a   I   0
x   b   J   0
x   c   K   0
x   c   M   15384
x   d   L   31282
x   e   N   15111
x   f   f   307813

我的结果应如下所示：

Units   Value       
x   369590      
a   0       
I   0       
b   0       
J   0       
c   15384       
K   0       
M   15384       
d   31282       
L   31282       
e   15111       
N   15111       
f   307813      
f   307813  

此数据集有两个列，一个是单位和值

Answer 1

一个选项是$id

gather

---

或在library(tidyverse) library(data.table) gather(df1, key, Units, c1:c3) %>% arrange(rowid(key)) %>% select(-key) ，base R的前三列中与最后一列绑定

unlist