Первая строка в виде имен столбцов в списке фреймов данных (2)

Question

Я хочу переименовать столбцы каждого фрейма данных в моем списке фреймов данных с первой строкой.

Я попробовал код из этого вопроса Первая строка в качестве имен столбцов в списке фреймов данных но он возвращает first_row_name = row_number / c (date = 3) /

dflist1 <- lapply(dflist, function(x){
  names(x) <- x[1,]
  x <- x[-1,]
  return(x)
})

Answer 1

Проблема в том, что столбцы были factor.Итак, мы unlist и конвертируем в character класс

names(x) <- as.character(unlist(x[1,]))