Description Usage Arguments Value Author(s) Examples
View source: R/AdvancedFunctions.R
Compute the Reflectance Factor from upwelling and downwelling radiance or counts
1 | GetReflectance(DownwellingRadiance, UpwellingRadiance)
|
DownwellingRadiance |
numeric vector or data.frame: spectrum/a of of downwelling radiance |
UpwellingRadiance |
numeric vector or data.frame: spectrum/a of of upwelling radiance |
numeric vector or data.frame containing the computed reflectance factor.
Tommaso Julitta, Mirco Migliavacca, Thomas Wutzler
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 |
data("FloX_data")
data("up_coeff")
data("dw_coeff")
data("wl_FloX")
#Get Target Radiance
L<-GetRadiance(DNSignal=FloX_data$L-FloX_data$dcL,IntegrationTime=FloX_data$IT_L/1000,RadCalCoeff=dw_coeff)
#Get Solar Radiance
E<-GetRadiance(DNSignal=FloX_data$E-FloX_data$dcE,IntegrationTime=FloX_data$IT_E/1000,RadCalCoeff=up_coeff)
#Get Reflectance
Ref<-GetReflectance(UpwellingRadiance = L,DownwellingRadiance=E)
#plot
x11()
par(mar=c(5,5,2,2))
plot(wl_FloX,Ref[,4],type="l",ylab="Reflectance [-]", xlab="WL [nm]")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.