如何转置数据框，以便行和列在r中切换？

Question

我有一个看起来像这样的数据框（简化）：

Age, Kodiak, Banana, Banff, Montreal, Fairfax
Age_1, 5, 6 , 7, 9, 2 
Age_2, 7, 6, 4, 3, 2
Age_3, 5, 3, 8, 5, 9

我希望我的数据框看起来像这样：

Location, Age_1, Age_2, Age_3
Kodiak, 5, 7, 5
Banana, 6, 6, 3
Banff, 7, 4, 8
Montreal, 9, 3, 5 
Fairfax, 2, 2, 9

我看了转置函数，但是我对如何同时切换列和行有些困惑。 我是R的新手。

Answer 1

有两种方法可以执行此操作。 第一个是使用t来转置数据帧，就好像它是矩阵一样（实际上t的结果是矩阵，而不是数据帧）。

另一个选择是采用整洁的数据方法，并将tidyr::spread与tidyr::gather一起使用。 两者都具有相似的结果，尽管第二种方法更具通用性，因为它可以部分应用。 还要注意，使用t ，第一列（类型为chr ）将成为新矩阵的第一行，因此，整个矩阵将转换为chr矩阵，而gather + spread会使列保持数字。

library(tidyr)

df <- read.table(text = "Age Kodiak Banana Banff Montreal Fairfax
Age_1 5 6 7 9 2 
Age_2 7 6 4 3 2
Age_3 5 3 8 5 9", header = T)

t(df)
#>          [,1]    [,2]    [,3]   
#> Age      "Age_1" "Age_2" "Age_3"
#> Kodiak   "5"     "7"     "5"    
#> Banana   "6"     "6"     "3"    
#> Banff    "7"     "4"     "8"    
#> Montreal "9"     "3"     "5"    
#> Fairfax  "2"     "2"     "9"

df %>%
  gather("location", "value", 2:ncol(df)) %>%
  spread(Age, value)
#>   location Age_1 Age_2 Age_3
#> 1   Banana     6     6     3
#> 2    Banff     7     4     8
#> 3  Fairfax     2     2     9
#> 4   Kodiak     5     7     5
#> 5 Montreal     9     3     5

Answer 2

使用t（）函数转置数据帧。

例如：

cars <- mtcars[1:5,1:4]
cars

                   mpg cyl disp  hp
Mazda RX4         21.0   6  160 110
Mazda RX4 Wag     21.0   6  160 110
Datsun 710        22.8   4  108  93
Hornet 4 Drive    21.4   6  258 110
Hornet Sportabout 18.7   8  360 175


t(cars)

     Mazda RX4 Mazda RX4 Wag Datsun 710 Hornet 4 Drive Hornet Sportabout
mpg         21            21       22.8           21.4              18.7
cyl          6             6        4.0            6.0               8.0
disp       160           160      108.0          258.0             360.0
hp         110           110       93.0          110.0             175.0

来源： https : //www.r-statistics.com/tag/transpose/