将矩阵转换为三列数据框。

Question

我有一个矩阵:

     var1 var2
row1   1   2
row2   3   4

想将其转换为 data.frame：

rows vars values
row1 var1   1
row1 var2   2
row2 var1   3
row2 var2   4

怎样做是最好的方法？

- Aleksandro M Granda

Answer 1

你可以使用melt。

library(reshape2)
setNames(melt(m1), c('rows', 'vars', 'values'))
#  rows vars values
#1 row1 var1      1
#2 row2 var1      3
#3 row1 var2      2
#4 row2 var2      4

或者

data.frame(rows=rownames(m1)[row(m1)], vars=colnames(m1)[col(m1)],
                      values=c(m1))
#   rows vars values
#1 row1 var1      1
#2 row2 var1      3
#3 row1 var2      2
#4 row2 var2      4

或者

 as.data.frame(as.table(m1))
 #    Var1 Var2 Freq
 #1 row1 var1    1
 #2 row2 var1    3
 #3 row1 var2    2
 #4 row2 var2    4

数据

m1 <- structure(c(1L, 3L, 2L, 4L), .Dim = c(2L, 2L), .Dimnames = list(
c("row1", "row2"), c("var1", "var2")))

- akrun

Answer 2

这里有一个使用tidyr的tidyverse解决方案。

library(tidyverse)

input <- 
  tribble(
    ~rows,   ~var1,  ~var2,
    "row1",  1,      2,
    "row2",  3,      4
  )

output <-
  input %>%
  gather(vars,count,-rows) %>%
  arrange(rows)

output

- jimbo