列内の同じ文字列の数を計算する - 奇数を削除する

Question

列内の同じ文字列の数を計算したい場合は、その文字列ですべての行を削除します。例：

set.seed(1) 
df <- data.frame(
Name = c(rep("Mark", 6), rep("Tom", 8), rep("Tim", 12), rep("Greg", 3), rep("Matt", 3)), 
rand = rnorm(32, 0, 1)) 

Nameを参照してください。 GregとMattが3回（奇数）表示されるので、削除する必要があります。 dplyr

library(dplyr) 
df_new <- df %>% group_by(Name) %>% filter(n() %% 2 == 0) 

Answer 1

table

EvenNames = names(table(DF$Name))[as.vector(table(DF$Name))%%2==0] 
DF = DF[DF$Name %in% EvenNames,] 

Answer 2

ソリューションこれはさえも、「名前」のカウントだけ維持するdata.tableとオプションが

library(data.table) 
setDT(df)[, if(!.N%%2) .SD , by = Name] 

で、「名前」でのユニークな要素のカウント/奇数に基づいている場合使用

Answer 3

と