E_Sobrino {LST}

Land Surface Emissivity according to Sobrino et al. 2008

Description

This function calculates Land Surface Emissivity according to Sobrino et al. 2008

Usage

E_Sobrino(red = red, NDVI = NDVI)

Arguments

red

Raster* object, red band of remote sensing imagery

NDVI

Raster* object, NDVI calculated from remote sensing imagery

Value

RasterLayer

Examples

red <- raster::raster(ncol=100, nrow=100)
set.seed(2)
raster::values(red) = runif(10000, min=0.1, max=0.4)
NDVI <- raster::raster(ncol=100, nrow=100)
set.seed(2)
raster::values(NDVI) = runif(10000, min=0.02, max=0.8)
E_Sobrino(red = red, NDVI = NDVI)