Closed ambarja closed 2 years ago
library(rgee) library(cptcity) ee_Initialize(quiet = T) viz = list( min = 500, max = 5000, palette = cpt("grass_elevation",rev = TRUE) ) ee$Image("CGIAR/SRTM90_V4") %>% Map$addLayer(name = "Elevation",visParams = viz) + Map$addLegend(visParams = viz, name = "Elevation")
Hi @ambarja I will take a look at it soon :) thank you
Code: