r - 我们如何通过管道工返回 R 中的多个地块？

Question

这就是我的代码的样子

    library(plumber)
    data(mtcars)
    test=mtcars
    #' @get /graph
    #' @png
    makePlot <- function(){
      par(mfrow=c(2,1))
      hist(test$mpg)
      hist(test$wt)
    }

    r <- plumb("plum_api.R") 
    r$run(port=8000)

但在输出中我只看到一张图。

Answer 1

这不是问题的解决方案，而是对上面给出的代码的个人测试。
我myfile.R使用以下代码创建了文件：

# myfile.R

#* @get /graph
#* @png
makePlot <- function(){
      data(mtcars)
      test=mtcars
      par(mfrow=c(2,1))
      hist(test$mpg)
      hist(test$wt)
}

然后我在 R 中运行以下命令：

r <- plumb("myfile.R")
r$run(port=8000)

这是我从浏览器中得到的：

希望这可以帮到你。