2

私はRとMongoDB、およびプログラミングに関連するすべてのことを初めて知っているので、ご容赦ください。ユーザー入力 (ドロップダウン メニュー) に基づいて MongoDB データベースにクエリを実行しようとしています。コードを実行すると、次のエラーが表示されます。

Error: com.mongodb.util.JSONParseException: 
       {'Name':input$prod}
               ^

ここに私のUIがあります:

mydb <- mongoDbConnect("mysearch")

shinyUI(fluidPage(
    titlePanel("MYsearch"),
    sidebarPanel(
        selectInput("prod", label = "Choose my Product/Service", 
        choices = list("Engineering", "Operations",
                       "Detection"), selected = "Engineering")
    ),
    mainPanel(tableOutput("table1"))
    )
))

ここに私のサーバーがあります：

my <- mongoDbConnect("mysearch")

shinyServer(function(input, output) {
    output$table1 <- renderTable({ 
          dbGetQuery(mydb, "usercollection", "{'Name':input$prod}")
     })
}
)

どうもありがとうございました。

4

1 に答える 1

1

これを試して...

queryParam <- paste('{\'Name\':', input$prod, '}');

shinyServer(function(input, output) {
    output$table1 <- renderTable({ 
          dbGetQuery(mydb, "usercollection", queryParam)
     })
}
)

input$prod に保存されている値を渡す代わりに、文字列 "input$prod" を関数に渡しています。

于 2014-07-15T21:05:45.767 に答える