Rでデータフレームの形状を変更する

debugcn 投稿 Dev

ヤーバウル

単一の列で繰り返される値を複数のデータ列を持つ単一の行に変換して、再形成する必要のあるデータフレームがあります。これは単純なはずですが、これを行う方法と、使用可能な多くのリシェイプ/キャスト関数のどれを使用する必要があるのかがわかりません。

私のデータの一部は次のようになります。

 Source       ID info
1     In   842701    1
2    Out   842701    1
3     In 21846591    2
4    Out 21846591    2
5     In 22181760    3
6     In 39338740    4
7    Out     9428    5

私はそれをこのように見せたい：

        ID In Out info
1   842701  1   1    1
2 21846591  1   1    2
3 22181760  1   0    3
4 39338740  1   0    4
5     9428  0   1    5

など、残りのすべての列（特定のエントリで同一）を保持します。

私は本当にいくつかの助けをいただければ幸いです。TIA。

akrun

これが使用する方法です reshape2

library(reshape2)
res <- dcast(transform(df, indx=1, ID=factor(ID, levels=unique(ID))),
                                   ID~Source, value.var="indx", fill=0)


res
#        ID In Out
#1   842701  1   1
#2 21846591  1   1
#3 22181760  1   0
#4 39338740  1   0
#5     9428  0   1

または

res1 <- as.data.frame.matrix(table(transform(df,
                 ID=factor(ID, levels=unique(ID)))[,2:1]))

更新

dcast(transform(df1, indx=1, ID=factor(ID, levels=unique(ID))),
                                 ...~Source, value.var="indx", fill=0)

 #        ID info In Out
 #1   842701    1  1   1
 #2 21846591    2  1   1
 #3 22181760    3  1   0
 #4 39338740    4  1   0
 #5     9428    5  0   1

reshapeからも使用できますbase R

 res2 <- reshape(transform(df1, indx=1), idvar=c("ID", "info"),
                              timevar="Source", direction="wide")

 res2[,3:4][is.na(res2)[,3:4]] <- 0
 res2
 #        ID info indx.In indx.Out
 #1   842701    1       1        1
 #3 21846591    2       1        1
 #5 22181760    3       1        0
 #6 39338740    4       1        0
 #7     9428    5       0        1

データ

df <- structure(list(Source = c("In", "Out", "In", "Out", "In", "In", 
"Out"), ID = c(842701L, 842701L, 21846591L, 21846591L, 22181760L, 
39338740L, 9428L)), .Names = c("Source", "ID"), class = "data.frame", row.names = c("1", 
"2", "3", "4", "5", "6", "7"))


df1 <- structure(list(Source = c("In", "Out", "In", "Out", "In", "In", 
 "Out"), ID = c(842701L, 842701L, 21846591L, 21846591L, 22181760L, 
 39338740L, 9428L), info = c(1L, 1L, 2L, 2L, 3L, 4L, 5L)), .Names = c("Source", 
 "ID", "info"), class = "data.frame", row.names = c("1", "2", 
 "3", "4", "5", "6", "7"))

この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。

侵害の場合は、連絡してください[email protected]