How do we return multiple plots in R through plumber?

Question

This is what my code looks like

    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)

But in the output I see only one graph.

The code is not reproducible. Did you mean to use the data-set `mtcars` instead of `mpg`? — Adam Quek, Jun 01 '17 at 05:27
To return multiple plots, you can put all plots generated in base64 in a json. To do this you can consult: https://stackoverflow.com/questions/33409363/convert-r-image-to-base-64 — Alessio93, Jun 15 '18 at 07:19

Marco Sandri · Answer 1 · 2017-06-01T23:39:46.807

This is not a solution to the problem, but a personal test of the code given above.
I created the file myfile.R with the following code:

# myfile.R

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

and then I ran within R the following commands:

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

This is what I got from the browser:

Hope this can help you.

How do we return multiple plots in R through plumber?

1 Answers1