SWA | R Documentation |
This function calculates Land Surface Temperature using split-window algorithm
SWA(
TIR_10 = TIR_10,
TIR_11 = TIR_11,
tau_10 = tau_10,
tau_11 = tau_11,
E_10 = E_10,
E_11 = E_11
)
TIR_10 |
SpatRaster object, Landsat band 10 |
TIR_11 |
SpatRaster object, Landsat band 11 |
tau_10 |
Atmospheric transmittance for Landsat band 10 |
tau_11 |
Atmospheric transmittance for Landsat band 11 |
E_10 |
SpatRaster object, Land Surface Emissivity for Landsat band 10 calculated according to Skokovic et al. 2014 or Yu et al. 2014 |
E_11 |
SpatRaster object, Land Surface Emissivity for Landsat band 11 calculated according to Skokovic et al. 2014 or Yu et al. 2014 |
SpatRaster
Yu, X., Guo, X. and Wu, Z., 2014. Land surface temperature retrieval from Landsat 8 TIRS—Comparison between radiative transfer equation-based method, split window algorithm and single channel method. Remote sensing, 6(10), pp.9829-9852.
TIR_10 <- terra::rast(ncol=100, nrow=100)
set.seed(2)
terra::values(TIR_10) = runif(10000, min=27791, max=30878)
TIR_11 <- terra::rast(ncol=100, nrow=100)
set.seed(2)
terra::values(TIR_11) = runif(10000, min=25686, max=28069)
E_10 <- terra::rast(ncol=100, nrow=100)
set.seed(1)
terra::values(E_10) = runif(10000, min=0.96, max=0.99)
E_11 <-terra::rast(ncol=100, nrow=100)
set.seed(2)
terra::values(E_11) = runif(10000, min=0.96, max=0.99)
Ts_SWA <- SWA(TIR_10=TIR_10, TIR_11=TIR_11, tau_10=0.86,
tau_11=0.87, E_10=E_10, E_11=E_11)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.