После обширных исследований я нашел способ решить проблему, и я надеюсь, что мое решение поможет таким людям, как я.
q1 = paste (shQuote (c, type = "cmd"),collapse = ",")
Этот шаг должен гарантировать, что вы распечатаете массив как строку, а затем будете использовать запрос
query =paste0('{"store":{"$in":[',q1,']}}')
, и следующий шаг будет включать егона запрос
salesinfo$find(fields = '{"store":true,"_id":false}',query = query)