r - 通过R中的函数动态发送字符串

Question

我想将 ID 动态发送到以下行。

out <- m$find('{"CreatedBy":"5ab0abb017aac60f443d517b"}')

这里我要动态发送的字符串是5ab0abb017aac60f443d517b

所以基本上一个函数会读取将 ID 作为输入参数并将其放入其中。

就像是。

fetchdat <- function(x)
{

  out <- m$find('{"CreatedBy":"5ab0abb017aac60f443d517b"}')


}

我可能想这样称呼它fetchdat("id")

有人建议R -How to pass value in mongolite Query

fetchdat <- function(x)
{

  out <- m$find(paste0('{"CreatedBy" :', x ,' }'))
  return(out)

}

我遇到以下错误

错误：无效的 JSON 对象：{“CreatedBy”：5ab0abb017aac60f443d517b }