epx.read: Helper: Reading xml-data from a EpiData-epx file into a...

In JohannPopp/epidatR: Reading EpiData Epx-Files and Converting Them to a Data.frame

Helper: Reading xml-data from a EpiData-epx file into a data.frame.

Description

A helper function of read.EpiData to read xml-data into a data.frame

Usage

epx.read(x)

Arguments

x	Data set informations extracted by epx.extract (info [[7]]).

Value

A data.frame

Examples

# This demonstrates the effects of all six helper functions to \code{\link{read.EpiData}}.

(x <- epx.example("SomeFakeData.epx"))

# epx.extract() extracts the information from an EpiData-epx file
(info <- epx.extract(x))

# epx.read() transforms the information into a data.frame
(dat <- lapply(info$perDataSet, epx.read))

# Combine dat and info in a data-set-wise list
# This is a necessary detour to handle EpiData files with multiple data sets.
perDataSet <- mapply(function(dat, info) list(list(dat = dat, info = info)), dat, info[[7]])

# epx.labels() replaces value codes with value labels
(datLab <- epx.labels(perDataSet$ds1$dat, perDataSet$ds1$info))

# epx.missing() replaces definde missing values with NA
(datMis <- epx.missing(perDataSet$ds1$dat, perDataSet$ds1$info))

# epx.class() sets variable classes according to the field types defined in EpiData
(datClass <- epx.class(perDataSet$ds1$dat, perDataSet$ds$info))

# Bringing it all together
read.EpiData(epx.example("SomeFakeData.epx"))

JohannPopp/epidatR documentation built on Jan. 29, 2024, 1:23 a.m.