powered by
ebimageGrob(pic, x=0.5, y=0.5, scale=1, raster=FALSE, angle, ...)
library(EBImage) library(RGraphics) x <- readImage("http://www.google.com/logos/teachersday09.gif") g1 <- ebimageGrob(x) dev.new(width=g1$width/72, height=g1$height/72) grid.draw(g1)
Run the code above in your browser using DataLab