x = readImage(system.file('images', 'nuclei.tif', package='EBImage'))
display(x)
y = thresh(x, 10, 10, 0.05)
display(y, title='Cell nuclei')
y = fillHull(y)
display(y, title='Cell nuclei without holes')
Run the code above in your browser using DataLab