r <- rast(system.file("ex/logo.tif", package="terra"))
RGB(r)
plot(r)
has.RGB(r)
RGB(r) <- NULL
has.RGB(r)
plot(r)
RGB(r) <- c(3,1,2)
# same as
# r <- RGB(r, c(3,1,2))
plot(r)
RGB(r) <- 1:3
x <- colorize(r, "col")
y <- colorize(r, "hsv")
z <- colorize(y, "rgb")
Run the code above in your browser using DataLab