Автоматическое имя в наборе данных с использованием вставки

Question

Я бы хотел поместить имена в наборы данных автоматически, используя paste или paste0.Например, если мы рассмотрим набор данных с тремя переменными, у нас будет шесть столбцов, и ожидаемый результат будет

dta <- data.frame(matrix(1:60, ncol = 6))
names(dta) <- c('X1_dim1', 'X1_dim2', 'X2_dim1', 'X2_dim2', 'X3_dim1', 'X3_dim2')

Answer 1

Использование rep

paste0("X", rep(1:ncol(dta), each = 2, length.out = ncol(dta)), "_dim", 1:2)
#[1] "X1_dim1" "X1_dim2" "X2_dim1" "X2_dim2" "X3_dim1" "X3_dim2"

rep создает последовательность длиной ncol(dta) с повторением каждого элемента дважды

rep(1:ncol(dta), each = 2, length.out = ncol(dta))
#[1] 1 1 2 2 3 3