# NOT RUN {
logo <- image_read("logo:")
logo2 <- image_blur(logo, 3)
logo3 <- image_oilpaint(logo, 3)
if(magick_config()$version >= "6.8.7"){
image_compare(logo, logo2, metric = "phash")
image_compare(logo, logo3, metric = "phash")
}
# }
Run the code above in your browser using DataLab