View source: R/ootb_sky_above.R
| ootb_sky_above | R Documentation |
Generate an above‑canopy sky brightness map without manual tuning.
ootb_sky_above(sky_points, z, a, sky_cie, size = 100)
sky_points |
|
z |
terra::SpatRaster generated with |
a |
terra::SpatRaster generated with |
sky_cie |
list. Output of |
size |
numeric vector of length one. Number of rows and columns of the low-resolution grid used before resampling to full resolution. |
Interpolates sky brightness with IDW and k‑nearest neighbors in spherical
space via interpolate_spherical(), blending observations with a fitted sky
model. Blending and IDW parameters are derived from sky_cie validation
metrics, and the result is scaled by the modeled zenith value to yield
digital numbers.
Named list with:
dn_rasternumeric terra::SpatRaster with interpolated above‑canopy sky brightness in digital numbers.
wnumeric. Weight assigned to the model‑based filling source.
kinteger. Number of nearest neighbors used by IDW.
pnumeric. IDW power parameter.
This function is part of a paper under preparation.
## Not run:
caim <- read_caim()
z <- zenith_image(ncol(caim), lens())
a <- azimuth_image(z)
path <- system.file("external/example.txt", package = "rcaiman")
sky_cie <- read_sky_cie(gsub(".txt", "", path), caim$Blue, z, a)
sky_points <- sky_cie$model$rr$sky_points
sky_above <- ootb_sky_above(sky_points, z, a, sky_cie)
plot(sky_above$dn_raster)
plot(caim$Blue/sky_above$dn_raster)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.