# NOT RUN {
dots <- image(system.file("sample_img/dots.jpg", package = "Rvision"))
blobs <- simpleBlobDetector(invert(dots), min_threshold = 25, max_threshold = 220,
filter_by_area = TRUE, min_area = 200, max_area = Inf,
filter_by_color = FALSE)
plot(dots)
plot(blobs, pch = 20)
# }
Run the code above in your browser using DataLab