r - 在r闪亮中使用动态数组进行mongolite过滤

Question

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

这是数组 if 元素：

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”：[shallen]}

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

Answer 1

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

q1=paste(shQuote(c, type="cmd"), collapse=", ")

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

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

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

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