# NOT RUN {
balloon <- image(system.file("sample_img/balloon1.png", package = "Rvision"))
dots <- image(system.file("sample_img/dots.jpg", package = "Rvision"))
dots_matched <- histmatch(dots, balloon)
# }
Run the code above in your browser using DataLab