## load example data
data(ExampleData.BINfileData, envir = environment())
## set POSITION/GRAIN pair dataset
selection <- data.frame(POSITION = c(1,5,7), GRAIN = c(0,0,0))
##subset
subset_SingleGrainData(object = CWOSL.SAR.Data, selection = selection)
Run the code above in your browser using DataLab