通过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}