An S7 class for representing clinical study tables with methods
for formatting and conversion to Word elements.
Usage
ClinicalTable(
type = character(0),
title = NULL,
metadata = list(),
data = (function (.data = list(), row.names = NULL)
{
if (is.null(row.names)) {
list2DF(.data)
}
else {
out <- list2DF(.data,
length(row.names))
attr(out, "row.names") <- row.names
out
}
})(),
flextable = NULL
)
Arguments
- type
Character string for table type
(e.g., "demographics", "adverse_events")
- title
Character string for table title
- metadata
List of additional metadata
- data
A data frame containing the table data
- flextable
A flextable object (optional, created if not provided)
Value
A ClinicalTable object
Examples
if (FALSE) { # \dontrun{
table <- ClinicalTable(
data = data.frame(x = 1:3, y = c("a", "b", "c")),
type = "test",
title = "Test Table"
)
} # }