重命名一个因子的多个级别 - R -

renaming many levels of a factor - R -

我正在尝试重命名我的因子变量的所有级别的名称,因此我可以 运行 TukeyHSD。 Tukey 过程不喜欢用数字命名级别。因此,我不关心名字本身,我只希望名字是一个字符——名字可以是字母表中的单个字母。

问题是我的关卡太多了。例如:

x1 <- sample(1:75,100,replace=T) 
x1 <- as.factor(x1)

> str(x1)
 Factor w/ 54 levels "1","2","4","5",..: 26 33 23 23 15 18 21 12 29 16 ...

我知道如何重命名它们的唯一方法是手动输入每个级别的名称:

levels(x1) <- c('name1', 'name2',...,'name54')

我怎样才能避免一个一个地输入所有的名字?是否有自动重命名?

谢谢!

@Aurèle 在评论中的回答可能是一个解决方案,但如果您不希望关卡中有任何数字,您可以尝试组合随机字母。这是一个可能的解决方案:

sample(combn(letters, 2, FUN = function(x) {paste0(x[1], x[2])}), length(levels(x1)))

输出:

 [1] "uv" "co" "ko" "eg" "ew" "dv" "ej" "px" "bc" "ku" "ip" "hz" "dk" "ou" "cd" "an" "hv" "nz" "uy" "bd"
[21] "kz" "af" "oy" "qz" "kl" "be" "ox" "bi" "mv" "fo" "el" "gj" "tv" "lv" "cl" "vx" "hl" "hy" "rv" "np"
[41] "dt" "br" "gz" "av" "aw" "nr" "bj" "ho" "gk" "mq" "ms" "lp" "jw" "gi" "cq"