REDCapCAST/man/split_non_repeating_forms.Rd

51 lines
1.2 KiB
Plaintext
Raw Normal View History

% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/utils.r
\name{split_non_repeating_forms}
\alias{split_non_repeating_forms}
\title{Split a data frame into separate tables for each form}
\usage{
split_non_repeating_forms(table, universal_fields, fields)
}
\arguments{
\item{table}{A data frame}
\item{universal_fields}{A character vector of fields that should be included
in every table}
\item{fields}{A two-column matrix containing the names of fields that should
be included in each form}
}
\value{
A list of data frames, one for each non-repeating form
}
\description{
Split a data frame into separate tables for each form
}
\examples{
# Create a table
table <- data.frame(
id = c(1, 2, 3, 4, 5),
form_a_name = c("John", "Alice", "Bob", "Eve", "Mallory"),
form_a_age = c(25, 30, 25, 15, 20),
form_b_name = c("John", "Alice", "Bob", "Eve", "Mallory"),
form_b_gender = c("M", "F", "M", "F", "F")
)
# Create the universal fields
universal_fields <- c("id")
# Create the fields
fields <- matrix(
c(
"form_a_name", "form_a",
"form_a_age", "form_a",
"form_b_name", "form_b",
"form_b_gender", "form_b"
),
ncol = 2, byrow = TRUE
)
# Split the table
split_non_repeating_forms(table, universal_fields, fields)
}