r - 有没有办法将LETTERS扩展到超过26个字符，例如AA，AB，AC ...？

Question

出于我的因素，我大部分时间都使用字母，但今天我尝试超过26个字符:

LETTERS[1:32]

期望会有自动递归分解AA，AB，AC ...但感到失望。这仅仅是LETTERS的限制，还是有办法使用其他功能来获取我正在寻找的东西？

Answer 1

702够了吗？

LETTERS702 <- c(LETTERS, sapply(LETTERS, function(x) paste0(x, LETTERS)))

如果不是，那18278呢？

MOAR_LETTERS <- function(n=2) {
  n <- as.integer(n[1L])
  if(!is.finite(n) || n < 2)
    stop("'n' must be a length-1 integer >= 2")

  res <- vector("list", n)
  res[[1]] <- LETTERS
  for(i in 2:n)
    res[[i]] <- c(sapply(res[[i-1L]], function(y) paste0(y, LETTERS)))

  unlist(res)
}
ml <- MOAR_LETTERS(3)
str(ml)
# chr [1:18278] "A" "B" "C" "D" "E" "F" "G" "H" "I" "J" "K" "L" "M" "N" "O" ...