# Silly example
mona <- ocv_read('https://jeroen.github.io/images/monalisa.jpg')
# Edge detection
ocv_edges(mona)
ocv_markers(mona)
# Find face
faces <- ocv_face(mona)
# To show locations of faces
facemask <- ocv_facemask(mona)
attr(facemask, 'faces')
# This is not strictly needed
ocv_destroy(mona)
Run the code above in your browser using DataLab