如何命名由 R 中函数中的实际输入在函数中创建的列表？

如何解决如何命名由 R 中函数中的实际输入在函数中创建的列表？

我的问题是我将数据帧存储在一个空列表中（0 行）。我写了一个函数来删除空的数据框，一切正常。不起作用的是新列表将输入作为列表的新名称（这会覆盖旧列表）。我的这个代码示例运行良好：

    ## write a funtion to drop empty dataframes and join non-empty dataframes with full join

rm_empty_df <- function(restr) {
  

  
 restr_1 <<- {{ restr }}[map({{ restr }},function(x) dim(x)[1]) > 0]

  
 restr_2 <<- {{ restr_1 }} %>% reduce(full_join,by="RegionName")
  
}

但是，我希望它做的是为函数提供两个输入，这样它就可以创建 resr_1 以仅在我的列表中包含非空数据帧，并将它们连接到一个名称为输入的数据帧功能。我试过这个：

## write a funtion to drop empty dataframes and join non-empty dataframes with full join

rm_empty_df <- function(restr,name_of_new_dataframe) {
  
 name_of_new_dataframe <- sym(name_of_new_dataframe)
  
 restr_1 <<- {{ restr }}[map({{ restr }},function(x) dim(x)[1]) > 0]

  
 "{ name_of_new_dataframe }" <<- {{ restr_1 }} %>% reduce(full_join,by="RegionName")
  
}

据我所知，这是在 dplyr 中分配变量名的工作原理，但在这里不起作用。感谢您的任何建议！