我从最近几周才开始研究 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`)
})
})