Прокручивая листы в одной книге для изменения листов, теперь нужно сохранить каждый лист в виде списка (или фрейма данных) в глобальной среде - PullRequest
Новая
       16

Прокручивая листы в одной книге для изменения листов, теперь нужно сохранить каждый лист в виде списка (или фрейма данных) в глобальной среде

0 голосов
/ 27 ноября 2018

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

list_indices <- c(2,3,4)
sheetNames <- names(sheetList)
result <- list()
for (i in 1:length(sheetNames)) {
  curr_sheet <- sheetList[[sheetNames[i]]]
  cleaned_sheet <- curr_sheet[list_indices,]
  result <- list(result, cleaned_sheet)
  # want to do the same for this line as the below referenced code
  # tried doing the same using 'list2env' but didn't work
}

# from a previous question, for reference

library("readxl")
sheets <- excel_sheets("spreadsheet.xlsx")
sheetList <- lapply(sheets,
   function(x)read_excel("spreadsheet.xlsx",
                          sheet = x))

names(sheetList) <- sheets
list2env(sheetList ,.GlobalEnv)
...