fastED(Sigdata, Redose, ncomp = 2, constant=TRUE,
control.args = list(), typ = "cw", nstart = 100, upb = 1,
ErrorMethod = c("mc", "sp"), model = NULL, origin = NULL)
Li, S.H., Li, B., 2006. Dose measurement using the fast component of LM-OSL signals from quartz. Radiation Measurements, 41, pp.534-541.
data(Signaldata)
### Use only the first two regenerative dose data.
fastED(Signaldata$cw[,-(8:15)],Redose=c(80,160)*0.13,
ncomp=2,constant=TRUE,model="line",origin=TRUE)
### Use all regenerative dose data (except the zero-dose).
# fastED(Signaldata$cw[,c(-12,-13)],Redose=c(80,160,240,320,80)*0.13,
# ncomp=3,constant=FALSE)
Run the code above in your browser using DataLab