Ошибка: объект 'my_dat' не найден

Question

При запуске это дает мне: error my_dat не найден.

pollutantmean <- function(directory, pollutant, id=1:332){ 
      file_list <- list.files(directory, full.names=TRUE) 
      my_dat <- data.frame() 
      for (i in id){ 
        my_dat <- rbind(my_dat, read.csv(files_list[i])) 
      } 

    } 

Answer 1

Попробуйте следующий код вместо:

id=1:332 
file_list <- list.files(directory, full.names=TRUE) 
my_dat_list <- lapply(file_list[id], read.csv) 
my_dat <- do.call(rbind, my_dat_list) 

Для работы вашего кода, используйте

require(data.table) 
id=1:332 
file_list <- list.files(directory, full.names=TRUE) 
my_dat_list <- lapply(file_list[id], fread) 
my_dat <- rbindlist(my_dat_list) 
setDF(my_dat) # to make it a data.frame instead of a data.table