display R plots in iTerm2

example.R

library(ggplot2)
library(emoGG)

source("imgcat.R")

p <- ggplot(iris, aes(Sepal.Length, Sepal.Width, color = Species)) + geom_emoji(emoji="1f337")
imgcat(print(p))

imgcat.R

# display your plots inline using imgcat witchcraft
# download imgcat from https://raw.githubusercontent.com/gnachman/iTerm2/master/tests/imgcat
# you need the beta version of iTerm2 to get this to work on Mac
# untested elsewhere

# David Lawrence Miller GPL 2016

imgcat <- function(plot_command){

  fn <- tempfile(pattern = "file", tmpdir = tempdir(), fileext = "")

  png(fn)

  eval(quote(plot_command))
  dev.off()
  system2("imgcat", fn)
}

Results look like this!