##load data
data(ExampleData.BINfileData, envir = environment())
##analyse data
output <- Analyse_SAR.OSLdata(input.data = CWOSL.SAR.Data,
signal.integral = c(1:5),
background.integral = c(900:1000),
position = c(1:1),
output.plot = TRUE)
##combine results relevant for further analysis
output.SAR <- data.frame(Dose = output$LnLxTnTx[[1]]$Dose,
LxTx = output$LnLxTnTx[[1]]$LxTx,
LxTx.Error = output$LnLxTnTx[[1]]$LxTx.Error)
output.SAR
Run the code above in your browser using DataLab