R/02-harmo_process_harmonization.R
as_dataschema_mlstr.RdChecks if an object is a valid DataSchema with specific format restrictions
for compatibility with other Maelstrom Research software and returns it with
the appropriate Rmonize::class attribute. This function mainly helps validate
inputs within other functions of the package but could be used separately to
ensure that an object has an appropriate structure.
as_dataschema_mlstr(object)A potential DataSchema object to be coerced.
A list of data frame(s) named 'Variables' and (if any) 'Categories', with
Rmonize::class 'dataschema_mlstr'.
A DataSchema is the list of core variables to generate across datasets and
related metadata. A DataSchema object is a list of data frames with elements
named 'Variables' (required) and 'Categories' (if any). The 'Variables'
element must contain at least the name column, and the 'Categories'
element must contain at least the variable and name columns to be usable
in any function. In 'Variables' the name column must also have unique
entries, and in 'Categories' the combination of variable and name columns
must also be unique.
The object may be specifically formatted to be compatible with additional Maelstrom Research software, in particular Opal environments.
{
# Use Rmonize_DEMO to run examples.
library(dplyr)
glimpse(as_dataschema_mlstr(Rmonize_DEMO$`dataschema - final`))
}
#> List of 2
#> $ Variables : tibble [13 × 4] (S3: tbl_df/tbl/data.frame)
#> ..$ name : chr [1:13] "adm_unique_id" "adm_study" "adm_year_dce" "sdc_age" ...
#> ..$ label:en : chr [1:13] "Unique identification code of the participant." "Indicator of the survey study." "Indicator of the survey data collection event." "Participant's age at time of data collection event." ...
#> ..$ valueType: chr [1:13] "text" "text" "text" "integer" ...
#> ..$ index : chr [1:13] "1" "2" "3" "4" ...
#> $ Categories: tibble [16 × 4] (S3: tbl_df/tbl/data.frame)
#> ..$ variable: chr [1:16] "adm_study" "adm_study" "adm_study" "sdc_sex" ...
#> ..$ name : chr [1:16] "MELBOURNE" "PARIS" "TOKYO" "1" ...
#> ..$ label:en: chr [1:16] "MELBOURNE" "PARIS" "TOKYO" "Male" ...
#> ..$ missing : logi [1:16] FALSE FALSE FALSE FALSE FALSE FALSE ...
#> - attr(*, "madshapR::class")= chr "data_dict_mlstr"
#> - attr(*, "Rmonize::class")= chr "dataschema_mlstr"