我们如何通过管道工 web api 返回 ggplot 图？

Question

我正在使用 ggplot 绘制条形图，并使用 R 中的管道工包将此函数创建为 Web api。

 library(plumber)
 library(ggplot2)
#' @get /histogram_test
#' @png
  histogram_test <- function(){
  mtcars=mtcars
  b=ggplot(mtcars,aes(mtcars$cyl))
  b+geom_bar()
}

然后我运行：

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

但这不会在浏览器上返回绘图。

Answer 1

所以如果在最后一行我们只使用打印命令，它就可以工作：print(b+geom_bar())。