NoiseEquivalentRadiance: NoiseEquivalentRadiance

Description Usage Arguments Value Author(s) Examples

Description

Compute the Signal to Noise Ratio of a spectrometer

Usage

1
2
3
4
NoiseEquivalentRadiance(sdLamp = specStats$sdLamp, sdDC = specStats$sdDC, 


    RadCalCoeff, IntegrationTime)

Arguments

sdLamp

numeric vector: sd of the spectra acquired with a stable lamp

sdDC

numeric vector: sd of the dark current spectra acquired with with the same integration time as the measurements over the lamp

RadCalCoeff

numeric vector: wavelength dependent vector of coefficient for calibration

IntegrationTime

numeric value: integration time used for the acqisition of the spectra.

Value

numeric vector: noise equivalent delta radiance for each wavelength

Author(s)

Tommaso Julitta, Mirco Migliavacca, Thomas Wutzler

Examples

 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
  





data("snr_data")


data("rad_cal")





#perform statistics on spectra


#calculate standard deviation of the lamp signal


lamp_sd<-StatsOnSpectra(wl=snr_data$wl,spectra=snr_data$data_lamp,fun='sd')


#calculate standard deviation of the dark spectrum


dc_sd<-StatsOnSpectra(wl=snr_data$wl,spectra=snr_data$data_dc,fun='sd')


#calculate noise equivalent delta radiance


NER<-NoiseEquivalentRadiance(sdLamp = lamp_sd,sdDC = dc_sd,IntegrationTime =  4000,RadCalCoeff = rad_cal$cal)


x11();plot(rad_cal$wl,NER*1000,type="l",xlab="WL [nm]",ylab=expression("Radiance [mW m"^-2* "sr"^-1* "nm"^-1*"]"),ylim=c(0,5))

tommasojulitta/FieldSpectroscopyCC documentation built on May 31, 2019, 6:19 p.m.