Learn R Programming

Luminescence (version 0.7.1)

analyse_portableOSL: Analyse portable CW-OSL measurements

Description

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.

Usage

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

Arguments

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.

Value

Returns an S4 RLum.Results object containing the following elements:

Function version

0.0.3 (2017-02-03 20:56:34)

How to cite

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

Details

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).

See Also

RLum.Analysis, RLum.Data.Curve

Examples

Run this code

# (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)



Run the code above in your browser using DataLab