在 R 中的 Reactable 中使用的动态变量

问题描述

假设我正在使用 iris 数据集：

reactable(iris,groupBy = "Species",columns = list(
  Sepal.Length = colDef(aggregate = "count"),Sepal.Width = colDef(aggregate = "mean"),Petal.Length = colDef(aggregate = "sum"),Petal.Width = colDef(aggregate = "max")
))

现在我想改变这一点，以便 UDF 传递要使用的列名，因为我想多次使用这个可响应的：

summary_table <- function(var_name){
reactable(iris,columns = list(
      var_name = colDef(aggregate = "count"),Petal.Width = colDef(aggregate = "max")
    ))
}

我也尝试使用 !!!syms(var_name) 但它给出了错误：

unexpected '=' in:

      "!!!syms(summary_vars) ="

有什么关于如何做到这一点的建议吗？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

dynamic-variables reactable