次のデータがあります。
Cubn 3.71455160837536 0.237454645363458
Gm9779 2.56051657980096 0.20850752817264
Apod 3.51796703048962 0.195999214485821
私がしたいのは、これを与えるような「溶けた」データを作成することです
var1 var2 value
1 FOO Cubn 3.7145516
2 FOO Gm9779 2.5605166
3 FOO Apod 3.5179670
4 BAR Cubn 0.2374546
5 BAR Gm9779 0.2085075
6 BAR Apod 0.1959992
しかし、なぜこれが失敗したのですか?
library("reshape2");
dat <-read.table("http://dpaste.com/1446132/plain/",header=FALSE)
rownames(dat) <- dat[,1]
dat[,1] <- NULL
colnames(dat) <- c("FOO","BAR");
head(dat)
longData <- melt(dat);
head(longData)
なぜの部分はわかりませんが、data.frame
の代わりにmelt
ingをmatrix
にすることで行名を取得できることは知っています。
melt(as.matrix(dat))
# Var1 Var2 value
# 1 Cubn FOO 3.7145516
# 2 Gm9779 FOO 2.5605166
# 3 Apod FOO 3.5179670
# 4 Cubn BAR 0.2374546
# 5 Gm9779 BAR 0.2085075
# 6 Apod BAR 0.1959992
melt
関数のコードを調べて、このように動作する理由を知る必要があります。特に、reshape2:::melt.matrix
のコードには次の行があり、上記の例の最初の2列を作成します。
labels <- expand.grid(lapply(dn, var.convert), KEEP.OUT.ATTRS = FALSE,
stringsAsFactors = FALSE)