我有一個數(shù)據(jù)框，如下例所示a = c(1, 1, 1, 2, 2, 3, 4, 4)b = c(3.5, 3.5, 2.5, 2, 2, 1, 2.2, 7)df <-data.frame(a,b)我可以通過以下代碼從R數(shù)據(jù)框中刪除重復(fù)的行，但是如何找到每個重復(fù)行重復(fù)的次數(shù)？我需要結(jié)果作為向量。unique(df)要么df[!duplicated(df), ]
3 回答
阿波羅的戰(zhàn)車
TA貢獻1862條經(jīng)驗 獲得超6個贊
你總是可以用一塊石頭殺死兩只鳥：
aggregate(list(numdup=rep(1,nrow(df))), df, length)
# or even:
aggregate(numdup ~., data=transform(df,numdup=1), length)
# or even:
aggregate(cbind(df[0],numdup=1), df, length)
a b numdup
1 3 1.0 1
2 2 2.0 2
3 4 2.2 1
4 1 2.5 1
5 1 3.5 2
6 4 7.0 1
- 3 回答
- 0 關(guān)注
- 7875 瀏覽
添加回答
舉報
0/150
提交
取消