powered by
grid.cap()
grid.raster
dev.capabilities to see if it is supported.
dev.capabilities
## Not run: # dev.new(width=.5, height=.5) # grid.rect() # grid.text("hi") # cap <- grid.cap() # dev.off() # # grid.raster(cap, width=.5, height=.5, interpolate=FALSE) # ## End(Not run)
Run the code above in your browser using DataLab