Именование столбцов в таблице данных в R

Question

У меня есть две таблицы данных, D1 и D2. D1 - 20 на 181, а D2 - на 181 на 1. Я хочу изменить имя столбцов D1 на значения в D2. Я использую следующий код, но я получаю сообщение об ошибке:

for(i in 1 : ncol(D1)){ names(D1)[i] <- c("D2[i,1]") 

Ошибка: объект типа «закрытия» не subsettable.

Не могли бы вы рассказать мне, что мне делать, чтобы заставить его работать?

Answer 1

Я не говорю с таблицами данных, но это решение, которое будет работать для фреймов данных и, надо надеяться, обобщить. Стратегия состоит в том, чтобы использовать тот факт, что вы можете заполнить один вектор другим вектором, не имея при этом необходимости использовать цикл.

# make the example data sets 
D1 <- as.data.frame(matrix(data=(1:(20*181)), nrow=20, ncol=181)) 
D2 <- data.frame(name=paste0("Name_",(1:181))) 

# make a copy of D1 
D1_named <- D1 

# the vector of D1 names is replaced by the value in D2 
# (both vectors must be of the same length) 
names(D1_named) <- D2$name