powered by
mergeChannels(imageList)
r <- floor( seq(1:(64*64)) / (64*64) * 255 ) dim(r) <- c(64,64) r <- as.antsImage(r) g <- r*0 b <- r*0 rgbImage = mergeChannels( list(r,g,b) )
Run the code above in your browser using DataLab