r - 使用 reshape2 转置表

Question

我有这个 data.frame:

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)