在r Shiny

Question

我有一个带多个选项的选择输入和我的Mongo查询

以下是包含元素的数组：

c<- c("elen","shallen")  
  query1  <-  paste0('{"client": {"$in"["',c,'"]}')

#sales info is the data base
salesinfo$find(fields = '{"store":true,"_id":false}',query = query1)

  

错误：无效的JSON对象：{“ client”：[elen]} {“ client”：[musten]}

这不起作用，请帮助我，请记住，这是一个动态数组，并且值会更改

Answer 1

经过广泛的研究，我找到了解决问题的方法，希望我的解决方案能够帮助像我这样的人。

  

q1 =粘贴（shQuote（c，类型=“ cmd”），折叠=“，”）

此步骤是确保您将数组作为字符串打印出来，然后使用查询

query =paste0('{"store":{"$in":[',q1,']}}')

，下一步将其合并到查询中

salesinfo$find(fields = '{"store":true,"_id":false}',query = query)