RNotes | EBImage


library(EBImage)

Places detected objects into an image stack.

Simple example

x <- readImage(system.file('images', 'shapes.png', package='EBImage'))
x <- x[110:512,1:130]
y <- bwlabel(x)
display(normalize(y), title='Objects')

z <- stackObjects(y, normalize(y))
display(z, title='Stacked objects', all=TRUE)

Load images

nuc <- readImage(system.file('images', 'nuclei.tif', package='EBImage'))
cel <- readImage(system.file('images', 'cells.tif', package='EBImage'))
img <- rgbImage(green=cel, blue=nuc)
display(img, title='Cells', all=TRUE)