powered by
This function calculates Land Surface Emissivity according to Valor and Caselles 1996
E_Valor(NDVI)
Raster* object, NDVI calculated from remote sensing imagery
RasterLayer
# NOT RUN { NDVI <- raster::raster(ncol=100, nrow=100) set.seed(2) raster::values(NDVI) = runif(10000, min=0.02, max=0.8) E_Valor(NDVI) # }
Run the code above in your browser using DataLab