The function analyses CW-OSL curve data produced by a SUERC portable OSL reader and produces a combined plot of OSL/IRSL signal intensities, OSL/IRSL depletion ratios and the IRSL/OSL ratio.

```
analyse_portableOSL(object, signal.integral, invert = FALSE,
normalise = FALSE, plot = TRUE, ...)
```

object

'>RLum.Analysis (**required**):
`RLum.Analysis`

object produced by read_PSL2R.

signal.integral

vector (**required**):
A vector of two values specifying the lower and upper channel used to
calculate the OSL/IRSL signal. Can be provided in form of `c(1, 5)`

or `1:5`

.

invert

logical (*with default*):
`TRUE`

to calculate and plot the data in reverse order.

normalise

logical (*with default*):
`TRUE`

to normalise the OSL/IRSL signals by the mean of all corresponding
data curves.

plot

logical (*with default*):
enable/disable plot output

...

currently not used.

0.0.3 (2018-01-21 17:22:38)

Burow, C. (2018). analyse_portableOSL(): Analyse portable CW-OSL measurements. Function version 0.0.3. In: Kreutzer, S., Burow, C., Dietze, M., Fuchs, M.C., Schmidt, C., Fischer, M., Friedrich, J. (2018). Luminescence: Comprehensive Luminescence Dating Data Analysis. R package version 0.8.6. https://CRAN.R-project.org/package=Luminescence

This function only works with `RLum.Analysis`

objects produced by read_PSL2R.
It further assumes (or rather requires) an equal amount of OSL and IRSL curves that
are pairwise combined for calculating the IRSL/OSL ratio. For calculating the depletion ratios
the cumulative signal of the last n channels (same number of channels as specified
by `signal.integral`

) is divided by cumulative signal of the first n channels (`signal.integral`

).

# NOT RUN { # (1) load example data set data("ExampleData.portableOSL", envir = environment()) # (2) merge and plot all RLum.Analysis objects merged <- merge_RLum(ExampleData.portableOSL) plot_RLum(merged, combine = TRUE) merged # (3) analyse and plot results <- analyse_portableOSL(merged, signal.integral = 1:5, invert = FALSE, normalise = TRUE) get_RLum(results) # }