如何使用R中的管道工api返回JSON

Question

我是R的新手。我应该使用R公开休息服务，所以我发现管道工使用R公开休息服务， 我在R中成功实现了管道工，但作为响应，我收到了如下所示的json数组

  

[{＆＃34;名称＆＃34;：＆＃34;拉杰什＆＃34;＆＃34;年龄＆＃34;：＆＃34; 10＆＃34;}]

如何从上面的响应中删除数组

我的预期输出如下

  

{＆＃34;名称＆＃34;：＆＃34;拉杰什＆＃34;＆＃34;年龄＆＃34;：＆＃34; 10＆＃34;}

代码

 library(plumber)
r <- plumb("MyFile.R")
r$run(port=8000)

我的文件.R在下面提到

    #* @post /sum
addTwo <- function(){
  name<-c("Rajesh")
  age<-c("10")
  df<-data.frame(name,age)

  return(df)

}

Answer 1

library(jsonlite)

df <- jsonlite::toJSON(data.frame(name, age, auto_unbox=TRUE))