r - 关闭 R 中的警告特定警告

Question

下面您可以看到我从不同类型的 Excel 工作表导入数据的功能。

library(dplyr)
library(readxl)
library(data.table)
library(purrr)
library(tidyr)

        read_excel_allsheets <- function(filename) { 
          sheets <- readxl::excel_sheets(filename) 
          x <- lapply(sheets, function(X) readxl::read_excel(filename, sheet = X)) 
          names(x) <- sheets 
          x 
        } 
        files <- list.files(path = "C:/Data", 
                            pattern = "*.xlsx",
                            full.names = TRUE)
        imported_templates <- lapply(files, read_excel_allsheets)
        names(imported_templates) <- basename(files)

当我从 Excel 工作表导入数据时，我收到如下消息:新名称:

* `` -> ...4
* `` -> ...5
* `` -> ...7
* `` -> ...8
* `` -> ...10
* ...

这很无聊，因为我需要导入大约 1000 个表。我试图用这行代码关闭这条消息，但消息仍然存在。

library(readxl, warn.conflicts=FALSE)

那么谁能帮我解决这个问题并关闭这个警告？

Answer 1

那些是消息，不是警告，所以你应该使用

suppressMessages({
  imported_templates <- lapply(files, read_excel_allsheets)
})