library(ReadImages) jpeg <- read.jpeg("Kofteridis_Page_4_Image_0001.jpg") plot(jpeg)