# NOT RUN {
balloon1 <- image(system.file("sample_img/balloon1.png", package = "Rvision"))
balloon2 <- image(system.file("sample_img/balloon2.png", package = "Rvision"))
balloon_sum <- add(balloon1, balloon2)
balloon_absdiff <- absdiff(balloon1, balloon2)
# }
Run the code above in your browser using DataLab