# 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 cimg to rimg
papilio_rimg <- cimg2rimg(papilio_cimg)
class(papilio_rimg)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab