# make a 100x100 image of random colors
random_colors <- array(runif(100 * 100 * 3),
dim = c(100, 100, 3))
recolorize::plotImageArray(random_colors)
# we can also plot...a real image
corbetti <- system.file("extdata/corbetti.png",
package = "recolorize")
img <- png::readPNG(corbetti)
plotImageArray(img)
Run the code above in your browser using DataLab