RNotes | EBImage
library(EBImage)
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)