Send a push notification with a message and a ggplot2 object

README.md

Send a push notification with a message and a ggplot2 object

ggpushover() allows you to send a push notification to your device that contains a message and a ggplot2 object as an image.

Prerequisites

You will need to have the pushoverr and ggplot2 packages installed. To do this, run:

install.packages(c("pushoverr", "ggplot2"))

Demo

library(ggplot2)

p <- ggplot(mtcars, aes(wt, mpg)) + geom_point()
ggpushover(plot = p, message = "We're gonna need a lighter car!")

ggpushover will default to using the plot that has most recently been created or modified, so the command above could be simplified:

ggpushover(message = "We're gonna need a lighter car!")

You can also specify additional things like message title and priority. See ?pushover for more details.

ggpushover.R

ggpushover <- function(plot = ggplot2::last_plot(),
                       message,
                       ...) {
  rlang::check_installed(pkg = c("pushoverr", "ggplot2"))
  stopifnot("ggplot" %in% class(p))
  
  tmpfile <- tempfile(fileext = ".png")
  ggplot2::ggsave(filename = tmpfile, plot = plot)
  
  result <- pushoverr::pushover(
    message = message,
    attachment = tmpfile,
    ...
  )
  
  unlink(tmpfile)
  invisible(result)
}