Проблема с объединением нескольких отдельных точек данных в R

Question

У меня есть X количество электронных таблиц с информацией, распределенной по двум вкладкам.Я ищу, чтобы объединить их в один фрейм данных.Файлы имеют 3 отдельные ячейки на вкладке 1 (D6, D9, D12), а вкладка 2 имеет сетку (D4: G6), которую я хочу вытащить из каждой электронной таблицы в ряд.

До сих пор я сделал фрейм данных и вытащил список файлов.Мне удалось получить цикл for, который извлекает данные из листа D6, я планирую скопировать этот код для остальных ячеек, которые мне нужны.

file.list <-
  list.files(
    path = "filepath",
    pattern = "*.xlsx",
    full.names = TRUE,
    recursive = FALSE
  )

colnames <- c( "A","B","C","etc",)

output <- matrix(NA,nrow = length(file.list), ncol = length(colnames), byrow = FALSE)
colnames(output) <- c(colnames)
rownames(output) <- c(file.list)




for (i in 1:length(file.list)) {

  filename=file.list[i]
  data = read.xlsx(file = filename, sheetIndex = 1, colIndex = 7, rowIndex = 6)
  assign(x = filename, value = data)

  }

Проблема, с которой я столкнулся, заключается в том, что R затем извлекает X количество отдельных точек данных, и я не могу представить это как один список из нескольких точек данных для вставки в фрейм данных.