RGB2PCT(x, band, driver.name = 'MEM', ncolors = 256, set.ctab = TRUE)
logo <- system.file("pictures/Rlogo.jpg", package="rgdal")[1]
x <- GDAL.open(logo)
dim(x)
dx <- RGB2PCT(x, band=1:3)
displayDataset(dx)
dim(dx)
GDAL.close(x)
GDAL.close(dx)
Run the code above in your browser using DataLab