# NOT RUN {
papilio <- getimg(system.file("testdata/images/papilio.png", package = "pavo"))
# From class rimg to cimg
papilio_cimg <- rimg2cimg(papilio)
class(papilio_cimg)
# From class rimg to magick-image
papilio_magick <- rimg2magick(papilio)
class(papilio_magick)
# }
Run the code above in your browser using DataLab