Combine objects

Source: R/combine_DataFiles.R

Combine objects generated by Generate_DataFile and Generate_DataFile_MG

combine_DataFiles(...)

Concat_DataFile(...)

Arguments

...

list objects generated by Generate_DataFile or Generate_DataFile_MG

Value

A nested list combining the input objects.

Details

The function allows to combine data already generated by Generate_DataFile or Generate_DataFile_MG. The number of input objects is not limited and the function works similar to the standard base R function c(), but preserves the particular structure of the objects imported and generated by 'BayLum'. The elements are combined by list element names.

Combining such data is rather useful in two scenarios:

  • The data have been already imported and treated and then stored in RData-files. Using the function combine_DataFiles() will significantly speed up the processing time,

  • simultaneous analysis of single and multi-grain OSL measurements.

Function version

0.1.1

Author

Sebastian Kreutzer, IRAMAT-CRP2A, UMR 5060, CNRS - Université Bordeaux Montaigne (France), adapting the idea from the function 'Concat_DataFile()' by Claire Christophe.

How to cite

Kreutzer, S., Christophe, C., 2024. combine_DataFiles(): Combine objects. Function version 0.1.1. In: Christophe, C., Philippe, A., Kreutzer, S., Guérin, G., Baumgarten, F.H., Frerebeau, N., 2024. BayLum: Chronological Bayesian Models Integrating Optically Stimulated. R package version 0.3.2. https://CRAN.r-project.org/package=BayLum

Examples

# load data files
data(DATA1,envir = environment())
data(DATA2,envir = environment())

#combine objects
DATA3 <- combine_DataFiles(DATA1, DATA2)
str(DATA3)
#> List of 11
#>  $ LT            :List of 2
#>   ..$ : num [1:101, 1:6] 5.66 6.9 4.05 3.43 4.97 ...
#>   ..$ : num [1:188, 1:6] 4.54 2.73 2.54 2.27 1.48 ...
#>  $ sLT           :List of 2
#>   ..$ : num [1:101, 1:6] 0.373 0.315 0.245 0.181 0.246 ...
#>   ..$ : num [1:188, 1:6] 0.333 0.386 0.128 0.171 0.145 ...
#>  $ ITimes        :List of 2
#>   ..$ : num [1:101, 1:5] 160 160 160 160 160 160 160 160 160 160 ...
#>   ..$ : num [1:188, 1:5] 40 40 40 40 40 40 40 40 40 40 ...
#>  $ dLab          : num [1:2, 1:2] 1.53e-01 5.89e-05 1.53e-01 5.89e-05
#>  $ ddot_env      : num [1:2, 1:2] 2.26 0.0617 2.512 0.0563
#>  $ regDose       :List of 2
#>   ..$ : num [1:101, 1:5] 24.6 24.6 24.6 24.6 24.6 ...
#>   ..$ : num [1:188, 1:5] 6.14 6.14 6.14 6.14 6.14 6.14 6.14 6.14 6.14 6.14 ...
#>  $ J             : num [1:2] 101 188
#>  $ K             : num [1:2] 5 5
#>  $ Nb_measurement: num [1:2] 14 14
#>  $ SampleNames   : chr [1:2] "samp 1" "samp 1"
#>  $ Nb_sample     : num 2
#>  - attr(*, "originator")= chr "create_DataFile"