替换列中出现次数少于 x 次的值

Question

如何替换列中出现次数少于 3 次的所有值？假设这是我的专栏(来自数据框):

>df$example
 aa
 aa
 aa
 bb
 bb
 cc
 cc
 cc

结果应该是(如果我用文本replaced替换它们):

>df$example
 aa
 aa
 aa
 replaced
 replaced 
 cc
 cc
 cc

我看到了另一个解决方案( using R - delete rows when a value repeated less than 3 times )，但这只是删除行。我也用 table 尝试过。我希望避免 for 循环，因为我将把它应用到一个巨大的数据框上。

Answer 1

在基础 R 中，您可以使用 ave,

with(df, ave(example, example, FUN = function(i) replace(i, length(i) < 3, 'replaced')))
#[1] "aa"       "aa"       "aa"       "replaced" "replaced" "cc"       "cc"       "cc"

注意:确保您的列设置为as.character()，即非因子