我想将分组列加粗。但是函数bold不接受列名的字符串类型。如何使input[[paste0("options_agg_", input$tabs)]]在粗体功能中选择行？
这是可行的：

ft <- as_grouped_data(filtered_other(), groups = input[[paste0("options_agg_", input$tabs)]], columns = input[[paste0("options_dim_", input$tabs)]]) %>%
      as_flextable() %>%
      bold(i = ~ !is.na(Product.category))
    
    htmltools_value(ft)

而这并不：

ft <- as_grouped_data(filtered_other(), groups = input[[paste0("options_agg_", input$tabs)]], columns = input[[paste0("options_dim_", input$tabs)]]) %>%
      as_flextable() %>%
      bold(i = ~ !is.na(input[[paste0("options_agg_", input$tabs)]]))
    
    htmltools_value(ft)

我不希望它总是设置为Product.category。
我试过：as.formula.我还考虑了eval和parse。但我没成功