質問に適切なタイトルを付ける方法すらわかりません。
データフレームdがあるとします。
現在のデータフレーム：
d <- data.frame(sample = LETTERS[1:2], cat = letters[11:20], count = c(1:10))
sample cat count
1 A k 1
2 B l 2
3 A m 3
4 B n 4
5 A o 5
6 B p 6
7 A q 7
8 B r 8
9 A s 9
10 B t 10
そして、各猫の値が独自の列になり、サンプルが列のままになり（または行名になり）、カウントが新しい猫の列の値になり、0が0になるように再配置しようとしています。サンプルには猫の数がありません。そのようです：
必要なデータフレームレイアウト：
sample k l m n o p q r s t
1 A 1 0 3 0 5 0 7 0 9 0
2 B 0 2 0 4 0 6 0 8 0 10
これについて行くための最良の方法は何ですか？
これは私が得た限りです：
for (i in unique(d$sample)) {
s <- d[d$sample==i,]
st <- as.data.frame(t(s[,3]))
colnames(st) <- s$cat
rownames(st) <- i
}
つまり、元のデータフレーム内のサンプルをループし、サンプルサブセットごとに転置します。だからこの場合私は得る
k m o q s
A 1 3 5 7 9
そして
l n p r t
B 2 4 6 8 10
そして、これは私が立ち往生しているところです。私はmerge（）、bind（）、apply（）などでたくさんのことを試しましたが、正しいことを思いつかないようです。さらに、上記のループが必要なステップであるかどうか疑問に思わずにはいられません-おそらくunstack（）を使用したものですか？
言うまでもなく、私はRに不慣れです...誰かが私を助けてくれるなら、それは大いにありがたいです！
PS Reasonデータフレームを再配置しようとしているのは、値のプロットを簡単にすることを目的としています（つまり、実際のdfをテーブル形式でプロットに表示したい）。
ありがとうございました！
reshapeベースRからの使用：
nn<-reshape(d,timevar="cat",idvar="sample",direction="wide")
names(nn)[-1]<-as.character(d$cat)
nn[is.na(nn)]<-0
> nn
sample k l m n o p q r s t
1 A 1 0 3 0 5 0 7 0 9 0
2 B 0 2 0 4 0 6 0 8 0 10
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加