R +的MongoDB：数据帧作为参数查找（）

Question

• 如何通过数据帧电池作为参数传递给发现功能：

• 我试过，但它抛出下面的错误：

  Dataset <- mongo$find('{"tagname":agg_df[1,1]}','{"text":1}') 
  

  错误：无效JSON对象：{ “标记名”：agg_df [1,1]}

  > agg_df[1,1] 
  [1] "fruits" 
  
  > typeof(agg_df) 
  [1] "list"   
  
  > typeof(agg_df[1,1]) 
  [1] "character" 
  

• 然后，我试图：

  Dataset <- mongo$find('{"tagname": "',agg_df[1,1], '"}','{"text":1}') 
  > Error: is.numeric(skip) is not TRUE 
  

Answer 1

qry_p1 <- paste0('{ "tagname" : "',agg_df[1,1] , '"}') 
qry_p2 <- paste0('{"text":1}') 
Dataset <- mongo$find(qry_p1,qry_p2)