3

次の形式のdata.frameに変換したい行列Aがあります。

rownames    colnames    values

使用する

unlist(A)       

助けてくれますが、行名は教えてくれません

ご協力ありがとうございました。

4

2 に答える 2

8

reshape2-packageを使用できます。

# load package
> require(reshape2)
# create an example matrix
> mdat <- matrix(c(1,2,3, 11,12,13), nrow = 2, ncol=3, byrow=TRUE,
+                dimnames = list(c("row1", "row2"),
+                                c("C.1", "C.2", "C.3")))
> mdat
     C.1 C.2 C.3
row1   1   2   3
row2  11  12  13
# bring matrix to long format using melt()
> melt(mdat)
  Var1 Var2 value
1 row1  C.1     1
2 row2  C.1    11
3 row1  C.2     2
4 row2  C.2    12
5 row1  C.3     3
6 row2  C.3    13
于 2012-06-24T10:58:58.347 に答える
5

ベースRのソリューション:

マトリックスは次のとおりです。

test <- matrix(1:9,nrow=3)
rownames(test) <- letters[1:3]
colnames(test) <- letters[4:6]

> test
  d e f
a 1 4 7
b 2 5 8
c 3 6 9

data.frame必要に応じてに変換します。

data.frame(
           rownames=as.vector(row(test,as.factor=TRUE)),
           colnames=as.vector(col(test,as.factor=TRUE)),
           values=as.vector(test)
          )

または、さらに短く、expand.grid入力に名前を付けて使用します。

data.frame(
        expand.grid(rownames=rownames(test),colnames=colnames(test)),
        values=as.vector(test)
          )

または、さらに短くして、as.data.frame.table(結果の大部分が得られます)を使用し、を使用して名前を設定しますsetNames

setNames(as.data.frame.table(test),c("rownames","colnames","values"))

結果:

  rownames colnames values
1        a        d      1
2        b        d      2
3        c        d      3
4        a        e      4
5        b        e      5
6        c        e      6
7        a        f      7
8        b        f      8
9        c        f      9
于 2012-06-24T11:12:59.850 に答える