powered by
imageType(x)
x <- read.jpeg(system.file("extdata", "Rlogo.jpg", package="ripa")) cat("Image Type", imageType(x)) x.grey <- rgb2grey(x) cat("Image Type", imageType(x.grey))
Run the code above in your browser using DataLab