导入Excel文件列表（R会话中止）

我有一小段代码从大约240个Excel文件导入GC数据。代码在我上次打开文档时起作用，但现在当我尝试运行区块时，我的R会话中止而不抛出错误消息

更新：：我可以使用gdata中的read.xls来解决问题，而不是使用readxl中的read\u excel。我想弄清楚其他人的问题是什么；read.xls比readxl慢得多

setwd("/Volumes/GoogleDrive/My Drive/Projects/MPB-LPP WBP Interactions/Summer 2017/WBP_LPP_GC/XLSFiles")

temp <- list.files(pattern = "*.xls")
myfiles <- base::lapply(temp, read_excel, skip=2)
temp.names <- tools::file_path_sans_ext(temp)
names(myfiles) <- temp.names

names.dfs <- c("Number", "Peak_Name", "RT", "Area", "Height", "Relative_Area", "Relative_Height", "Amount")

named.data=lapply(myfiles, setNames, names.dfs)

all.data <- rbindlist(named.data, use.names = TRUE, idcol = TRUE)

---

嘿，迈克，哪一行出错了？什么是错误消息？我没有收到任何错误消息；但是导致会话崩溃的一行是：myfiles=lappy（temp，read\u excel，skip=2）。我也尝试过使用read\u xls，这也会导致会话崩溃。啊，抱歉，错过了。

temp

看起来和你期望的一样吗？temp工作正常；它给我所有文件名的列表。也许可以尝试在循环中打印名称，看看它是一个特定文件还是所有文件，例如base:：lappy（temp，FUN=function（x）{print（x）read_excel（x，skip=2）}。抱歉，我不知道如何在评论中添加新行

small= sample(temp, 10)
myfiles=lapply(small, skip=2)