How to write a test for a ggplot plot
问题 I have a lot of functions that generate plots, typically with ggplot2. Right now, I'm generating the plot and testing the underlying data. But I'd like to know if there's a reasonable way to test that the plot contains the layers/options I expect it to or that graphical elements match expectations. For example: library(ggplot2) library(scales) # for percent() library(testthat) df <- data.frame( Response = LETTERS[1:5], Proportion = c(0.1,0.2,0.1,0.2,0.4) ) #' @export plot_fun plot_fun <-