renderDataTable未从动态数据创建数据帧

renderDataTable未从动态数据创建数据帧,r,shiny,R,Shiny,我正在创建一个闪亮的应用程序,用户可以从下拉菜单中选择所需的字段来显示数据表。我正在使用renderDataTable显示原始数据。“输出数据表”会随下拉选择而更改。根据这些原始数据,我想创建图表来总结数据,这需要一个数据框架 首先,我让我的下拉选择反应。这是它的代码: Table1 <- reactive({ input$names1 input$names2 }) 表1我们在这里帮助您解决问题。而不是完全回答。请告诉我们您为此付出了哪些努力。您好@Nehal,刚刚编辑了我的代码以显示

我正在创建一个闪亮的应用程序,用户可以从下拉菜单中选择所需的字段来显示数据表。我正在使用renderDataTable显示原始数据。“输出数据表”会随下拉选择而更改。根据这些原始数据,我想创建图表来总结数据,这需要一个数据框架

首先,我让我的下拉选择反应。这是它的代码:

Table1 <- reactive({
input$names1
input$names2
})

表1我们在这里帮助您解决问题。而不是完全回答。请告诉我们您为此付出了哪些努力。您好@Nehal,刚刚编辑了我的代码以显示流程。我是R的新手,所以不能尝试太多。你知道根本原因在哪里吗?我想用这个“表2”来创建图形。@AkshayFadnavis您的代码块没有多大帮助,因为它们显然是错误的。我不是故意粗鲁,我只是想说,这将有助于准确地知道表1等应该是什么。因为现在的方式,
Table1()
将具有值
input$names2
(因为它是最后一个计算表达式),这显然不是您想要的。与
Table2
相同:您希望它是另一个
data.frame
,还是它只是
renderDataTable
中的一个名称?知道您想要什么(使用可能的示例数据),我们可以向您展示它是如何完成的。表1只是一个函数名,其中我有两个反应输入元素,而表2是我想要创建动态数据框的表名。不管怎样,我找到了解决办法。谢谢你的评论。
output$Data <- renderDataTable({
Table2 <- as.data.frame(sqlQuery(dbhandle, paste0("select a, b, c from Table where column = ",input$names1," and column2 = ",input$names2,""))) })