lapply 和 readxl 错误

lapply and readxl Error

我正在使用 readxllapply 将多个 .xlsx 文件导入我的环境。以下内容之前工作得很好,但现在当我尝试重新 运行 它时,它给了我以下错误:

Error in read_fun(path = path, sheet = sheet, limits = limits, shim = shim, : Evaluation error: zip file 'data.xlsx' cannot be opened.

代码:

setwd("./Data Folder") #设置路径以避免lapply错误(这是我上次出错时解决的方法)

加载所有 "Data Folder" 个数据集

library(readxl)

file.list <- list.files(path = "./Data Folder", pattern = '*.xlsx') df.list <- lapply(file.list, read_excel)

我检查过我输入的路径是否仍然正确,我没有误改。我也试过用excel打开文件夹里的文件,文件没有问题。有任何想法吗?

我找到问题了。我在 RStudio 中打开了两个不同的选项卡,一个是 R markdown,另一个是 R Script。我在没有意识到的情况下试图 运行 R markdown 中的代码,所以我得到了 lapply 错误,因为 setwd 没有保存在 R 的系统中。

如果有人遇到这个问题:

  • 检查您是否在 R Script
  • 将要从中取出数据的文件夹设为主文件夹
  • 运行 一次 markdown 中的整个块