次の形式のdata.frameに変換したい行列Aがあります。
rownames colnames values
使用する
unlist(A)
助けてくれますが、行名は教えてくれません
ご協力ありがとうございました。
次の形式のdata.frameに変換したい行列Aがあります。
rownames colnames values
使用する
unlist(A)
助けてくれますが、行名は教えてくれません
ご協力ありがとうございました。
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
ベース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