2014-01-10 2 views
4

У меня есть этот data.frame:Транспонирование стола с reshape2

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 быть реконструированной в этот формат:

enter image description here

Я специально после ответа который использует пакет reshape2

ответ

4

Вот что вы ищете:

> 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) 
Смежные вопросы