mirror of
https://github.com/agdamsbo/REDCapCAST.git
synced 2026-06-19 05:07:30 +02:00
documented preview functions and included gt
This commit is contained in:
parent
47fb3fceca
commit
a896bf4e76
8 changed files with 113 additions and 47 deletions
|
|
@ -197,6 +197,8 @@ ds2dd_detailed <- function(data,
|
|||
record_id = seq_len(nrow(data)),
|
||||
data
|
||||
)
|
||||
# set_attr(data$record_id,label="ID",attr="label")
|
||||
|
||||
message("A default id column has been added")
|
||||
}
|
||||
|
||||
|
|
@ -337,12 +339,15 @@ ds2dd_detailed <- function(data,
|
|||
)
|
||||
)
|
||||
|
||||
list(
|
||||
out <- list(
|
||||
data = data |>
|
||||
hms2character() |>
|
||||
stats::setNames(dd$field_name),
|
||||
meta = dd
|
||||
)
|
||||
|
||||
class(out) <- c("REDCapCAST",class(out))
|
||||
out
|
||||
}
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue