使用 reshape2 转置表

Question

我有这个数据框：

mtcars_sub <- mtcars[1:5,c("mpg", "disp")]
mtcars_sub$car <- rownames(mtcars_sub)
rownames(mtcars_sub) <- 1:5
mtcars_sub

   mpg disp               car
1 21.0  160         Mazda RX4
2 21.0  160     Mazda RX4 Wag
3 22.8  108        Datsun 710
4 21.4  258    Hornet 4 Drive
5 18.7  360 Hornet Sportabout

我需要将 data.frame 重新整形为以下格式：

reshape2我特别在寻找使用该包的答案

Answer 1

这就是您正在寻找的内容：

> library(reshape2)
> dcast(melt(mtcars_sub), variable~car)
Using car as id variables
  variable Datsun 710 Hornet 4 Drive Hornet Sportabout Mazda RX4 Mazda RX4 Wag
1      mpg       22.8           21.4              18.7        21            21
2     disp      108.0          258.0             360.0       160           160

或者你可以用...替换variable

>dcast(melt(mtcars_sub), ...~car)