Я упомянул расположение каталога и пытался перебрать файлы, но следующее, похоже, не работает.
file_list <- list.files ()
file_list </p>
for (file in file_list){
# if the merged dataset doesn't exist, create it
if (!exists("dataset")){
dataset <- read.table(file, header=TRUE, sep="\t")
}
# if the merged dataset does exist, append to it
if (exists("dataset")){
temp_dataset <-read.table(file, header=TRUE, sep="\t")
dataset<-rbind(dataset, temp_dataset)
rm(temp_dataset)
}
}
Я использую этот код, однако он выдает странный вывод с несколькими предупреждениями:
Предупреждающие сообщения:
1: в файле read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
строка 1 содержит встроенные нули
2: в файле read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
неполная последняя строка, найденная readTableHeader в 'File_0.XLSX'
3: В read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
строка 1 содержит встроенные нули
4: в read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
неполная последняя строка, найденная readTableHeader в 'File_0.XLSX'
5: в read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
неполная последняя строка, найденная readTableHeader в File_1.XLSX
6: в файле read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
неполная последняя строка, найденная readTableHeader в 'File_10.XLSX'
7: В read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
неполная последняя строка, найденная readTableHeader в 'File_11.XLSX'
8: в read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
неполная последняя строка, найденная readTableHeader в 'File_12.XLSX'
9: В read.table (файл, заголовок = ИСТИНА, sep = "\ t"):
неполная последняя строка, найденная readTableHeader для 'File_13.XLSX'
Что означают эти предупреждения? Куда я иду не так. Я не хочу писать RBIND для всего этого.