r - Rで形状を変更し、行をベクトルに変換します

Question

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

fruit          ID
apple          1
mango          1
orange         1
grapes         2
strawberries   3

reshapeを使用してやりたいのは次のとおりです。

ID     Fruit
 1     apple,mango,orange 
 2     grapes
 3     strawberries

形を変えてみました

rehshape(data=test,direction="long",varying=c(1,2),v.names="v1",timevar="v2",times=c(1,2))->test.long              

しかし、それは明らかに間違っています。

Answer 1

あなたが試すことができますaggregate

aggregate(fruit ~ ID, data , paste, sep=',')

  ID                fruit
1  1 apple, mango, orange
2  2               grapes
3  3         strawberries

Answer 2

他の誰もがaggregateカバーしているので、ここにあなたのためにreshape仕事をする方法があります: あなたに時間変数を追加してdata.frameから、長いものから広いものへと形を変えてみてください。オリジナルdata.frameが「mydf」と呼ばれると仮定します。

> # Create a time variable
> mydf$time <- ave(mydf$ID, mydf$ID, FUN = seq_along)
> mydf
         fruit ID time
1        apple  1    1
2        mango  1    2
3       orange  1    3
4       grapes  2    1
5 strawberries  3    1

> # Now, reshape
> reshape(mydf, direction = "wide", idvar = "ID", timevar = "time")
  ID      fruit.1 fruit.2 fruit.3
1  1        apple   mango  orange
4  2       grapes    <NA>    <NA>
5  3 strawberries    <NA>    <NA>

Answer 3

これを試して

> aggregate(fruit~ID, data=DF, FUN=paste0)
  ID                fruit
1  1 apple, mango, orange
2  2               grapes
3  3         strawberries