Respect pixelratio (retina) when redrawing cached images

This commit is contained in:
Joe Cheng
2018-01-09 13:01:36 -08:00
parent f23fc3beaa
commit d35c6002a6

View File

@@ -149,7 +149,7 @@ resizeSavedPlot <- function(name, session, result, width, height, pixelratio, re
outfile <- plotPNG(function() {
grDevices::replayPlot(result$recordedPlot)
coordmap <<- getCoordmap(result$plotResult, width, height, pixelratio, res)
}, width = width, height = height, res = res)
}, width = width*pixelratio, height = height*pixelratio, res = res*pixelratio)
on.exit(unlink(outfile), add = TRUE)
img <- list(