driver <- new('GDALDriver', as.character(getGDALDriverNames()[1,1]))
setMetadata(driver, list(Key = 'Test metadata'))
getMetadata(driver)
rm(driver)
logo <- system.file("pictures/logo.jpg", package="rgdal")[1]
x <- new("GDALReadOnlyDataset", logo)
getDescription(x)
getMetadata(x)
dim(x)
GDAL.close(x)
Run the code above in your browser using DataCamp Workspace