r - 如何动态命名 R Shiny 中的数据框？

Question

我从最近几周才开始研究 R Shiny。我正在研究一个项目，该项目基本上 QC 从两个不同文件生成的数据帧数量的值。无论如何，问题是我有一个大的 R 脚本，它几乎完成了所有数据校准，并且一个文件根据 excel 选项卡的数量生成了多个数据帧，并且所有数据帧都有不同的列，因此无法绑定。所以我创建了一个 R 脚本的函数 (my_function) 并传递了三个参数 - 1. 输入文件和其他两个通过 Shiny UI 输入的文件。R 脚本的输出将是一个包含多个数据框的列表。但是，我无法生成数据帧的动态名称，因此无法进一步使用它们。任何人都可以帮助我吗？

observeEvent(input$goButton ,
               {
                 cc <- my_function(input$v_inputfile$datapath, as.numeric(input$col_headers), input$wave_data)
                 print(length(cc))
                 for(jj in 1:length(cc)){
                   local({
                     print(class(cc[[jj]]))
                     assign(paste0("df_",jj),cc[[jj]])
                     print("End")
                   })
                 }
                  output$contents <- DT::renderDataTable({
                   head(`df_1`)
                 })
               })

标签： rrshiny