Как создать общую строку букв и цифр для «n» кластеров в R для добавления в фрейм данных?

Вот небольшая функция, которая должна сделать это за вас:

f <- function(g,n) {
  letter_index = if_else(g%%26 ==0, 26, g%%26)
  paste0(
    paste0(rep(LETTERS[letter_index], times = ceiling(g/26)), collapse = ""),
    1:n)
}

Теперь примените эту функцию к каждому значению формы, используя group_by() и mutate().

df %>% 
  group_by(shape) %>% 
  mutate(code = f(cur_group_id(), n()))

Выход:

        x       y shape code 
    <dbl>   <dbl> <dbl> <chr>
 1 -0.804 -0.853      1 A1   
 2  0.853  0.368      1 A2   
 3  0.927 -0.275      2 B1   
 4 -0.753 -0.512      2 B2   
 5  0.707  0.811      2 B3   
 6  1.03   0.395      2 B4   
 7 -0.476  0.990      3 C1   
 8 -0.460 -0.859      3 C2   
 9 -0.680 -0.661      4 D1   
10 -1.03  -0.0220     4 D2

Объяснение:

• Функция f() принимает два значения: целое число, указывающее номер группы (передается cur_groupid()) и количество значений в этом значении shape (передается n()). В функции мы используем по модулю, чтобы получить нужное количество раз для репликации значения БУКВ, а затем вставляем его в последовательность от 1 до n.