util_ensure_data_type: Ensure matching data types

In dataquieR: Data Quality in Epidemiological Research

Ensure matching data types

Description

Utility function to convert selected variables in the study data to match the data types given in the metadata. If such a conversion is not possible, the study data remains unchanged.

Usage

util_ensure_data_type(variables, study_data, meta_data, label_col)

Arguments

variables	variable list the names of the variables
study_data	data.frame the data frame that contains the measurements
meta_data	data.frame the data frame that contains metadata attributes of study data
label_col	variable attribute the name of the column in the metadata with labels of variables

Value

the transformed (if necessary and possible) study data

Examples

## Not run: 
load(system.file("extdata/meta_data.RData", package = "dataquieR"), envir =
  environment())
load(system.file("extdata/study_data.RData", package = "dataquieR"), envir =
  environment())
study_data$v00000 <- as.character(study_data$v00000)
sd1 <-
  util_ensure_data_type(
    c("CENTER_0", "AGE_0", "v00000", "v003"),
    study_data = study_data,
    meta_data = meta_data,
    label_col = "LABEL"
  )
all.equal(study_data, sd1)
study_data$v00013 <- as.numeric(study_data$v00013)
Sys.setenv(TZ = 'CET')
sd2 <-
  util_ensure_data_type(
    c("CENTER_0", "AGE_0", "v00000", "EXAM_DT_0"),
    study_data = study_data,
    meta_data = meta_data,
    label_col = "LABEL"
   )
all.equal(study_data, sd2)
all.equal(sd1$v00013, sd2$v00013)

## End(Not run)

dataquieR documentation built on July 26, 2023, 6:10 p.m.