将多个（21）选项卡从excel导入R：为什么我总是收到此错误消息“Q”；错误：意外'；}'；在"；}&引用；？

我一直在尝试将数据从单独的表格导入R，这样我就可以使用它们来计算David的个人分数

但是，出于某种原因，我一直收到以下错误消息：

错误：“}”中出现意外的“}”

在网上看了之后，这让我很困惑

另外，它在行号旁边给出了一个X，表示有一个不匹配的左括号“（”，但我在任何地方都找不到任何不匹配的左括号

下面是我的代码：

read_excel_allsheets <- function("C:/Users/James/Desktop/Animal Behaviour Project/Interaction Data/Dominance Only Interaction Data Final.xlsx" ) {
  Sheets <- readxl::excel_sheets("C:/Users/James/Desktop/Animal Behaviour Project/Interaction Data/Dominance Only Interaction Data Final.xlsx")
  Groups <- lapply(Sheets, function(X) readxl::read_excel("C:/Users/James/Desktop/Animal Behaviour Project/Interaction Data/Dominance Only Interaction Data Final.xlsx", sheet = X))
  names(Groups) <- Sheets 
} 

---

read\u excel\u allsheets问题是您试图在函数中使用字符串作为参数。我建议改为使用类似以下内容：

read_excel_allsheets <- function(file_name = "C:/Users/James/Desktop/Animal Behaviour Project/Interaction Data/Dominance Only Interaction Data Final.xlsx" ) {
  Sheets <- readxl::excel_sheets(file_name)
  Groups <-    lapply(Sheets, function(X) readxl::read_excel(file_name, sheet = X))
  names(Groups) <- Sheets 
}

read\u excel\u所有表格的括号看起来都与我匹配。也就是说，除非您将
Groups
或
返回（Groups）
在函数结束时，返回的值仅为最后一行的值：
工作表中的名称，而不是读入的数据。这太完美了，非常感谢！您为我节省了一个令人沮丧的夜晚！