0

これを間違って尋ねたら申し訳ありませんが、私は R を初めて使用します。次のようなベクトル X があるとします。

Sam
George
George
Suzzy
Suzzy
Suzzy
Leo

私が望むのは、2 回しか出現しない名前を含むベクトルを取得できるようにすることですが、元のベクトルでの出現回数は維持します。疑似コードがどのように見えるかの例を次に示します。

x <- x[sum x.uniquecount() >=2]

そして最終結果：

George
George
Suzzy
Suzzy
Suzzy
4

2 に答える 2

2 
 vec <- scan(what="")
1: Sam
2: George
3: George
4: Suzzy
5: Suzzy
6: Suzzy
7: Leo
8: 
Read 7 items


vec[ vec %in% names(table(vec))[table(vec) >= 2] ]
[1] "George" "George" "Suzzy"  "Suzzy"  "Suzzy"
于 2013-10-08T18:36:10.927 に答える
1 
df <- read.table(text = "Sam
George
George
Suzzy
Suzzy
Suzzy
Leo")

n <- ave(as.numeric(df$V1), df$V1, FUN = length)

df[n > 1, ]

# [1] George George Suzzy  Suzzy  Suzzy
于 2013-10-08T18:47:59.757 に答える