如何在R函数中获取变量名称

Question

我想将变量名称作为函数中的字符串引用，但无法实现它。

例如，在一个excel中，我有4个工作表，我需要使用以下行4次，

sales.df<- read_xlsx("abc.xlsx", sheet ="sales")
profit.df<- read_xlsx("abc.xlsx", sheet ="profit")
revenue.df<-read_xlsx("abc.xlsx", sheet ="revenue")
budget.df<- read_xlsx("abc.xlsx", sheet ="budget")

相反，我想写一个函数：

  read_func = function(sheet_name){

    sheet_name.df<- read_xlsx("abc.xlsx", sheet ="sheet_name"))

    return(sheet_name.df)
 }

调用函数

    read_func(sales)

不幸的是，它不起作用。 sheet_name未动态更新。

提前感谢您的帮助。

Answer 1

zmq::socket_t包有一个函数readxl来读取文件中的所有工作表，您可以使用excel_sheets()来完成相同的操作。

lapply

它是tidyverse的一部分，因此您可以在其上阅读更多内容there。