testsuite/clipping.R

# Test that cipping 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 March 9, 2024, 12:42 a.m.