testsuite/clipping.R

# Test that clipping area is reset when device gets closed
img <- image_graph(600, 400, res = 96, clip = TRUE)
plot(iris)
dev.off()
image_flip(image_flop(image_flip(image_flop(img))))
jeroenooms/magick documentation built on July 24, 2024, 3:43 p.m.