web-dev-qa-db-ja.com

行列を3列のdata.frameに変換します

私はマトリックスを持っています：

     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

それを行うための最良の方法は何ですか？

rmatrixdataframereshape
16
Aleksandro M Granda

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")))
30
akrun

Tidyrを使用したtidyverseの解決策は次のとおりです。

library(tidyverse)

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

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

output
0
jimbo