REDCapCAST/man/create_instrument_meta.Rd

53 lines
1.5 KiB
Plaintext
Raw Normal View History

% Generated by roxygen2: do not edit by hand
2024-10-24 11:41:48 +02:00
% Please edit documentation in R/export_redcap_instrument.R
\name{create_instrument_meta}
\alias{create_instrument_meta}
2024-10-24 11:41:48 +02:00
\title{DEPRICATED Create zips file with necessary content based on data set}
\usage{
create_instrument_meta(data, dir = here::here(""), record.id = TRUE)
}
\arguments{
\item{data}{metadata for the relevant instrument.
Could be from `ds2dd_detailed()`}
\item{dir}{destination dir for the instrument zip. Default is the current WD.}
\item{record.id}{flag to omit the first row of the data dictionary assuming
this is the record_id field which should not be included in the instrument.
Default is TRUE.}
}
\value{
list
}
\description{
Metadata can be added by editing the data dictionary of a project in the
2024-10-24 11:41:48 +02:00
initial design phase. If you want to later add new instruments, this
function can be used to create (an) instrument(s) to add to a project in
production.
}
\examples{
2024-11-26 14:46:22 +01:00
\dontrun{
data <- iris |>
2024-10-24 11:41:48 +02:00
ds2dd_detailed(
add.auto.id = TRUE,
form.name = sample(c("b", "c"),
size = 6,
replace = TRUE, prob = rep(.5, 2)
)
) |>
purrr::pluck("meta")
# data |> create_instrument_meta()
data <- iris |>
ds2dd_detailed(add.auto.id = FALSE) |>
purrr::pluck("data")
2024-10-24 11:41:48 +02:00
iris |>
setNames(glue::glue("{sample(x = c('a','b'),size = length(ncol(iris)),
replace=TRUE,prob = rep(x=.5,2))}__{names(iris)}")) |>
ds2dd_detailed(form.sep = "__")
2024-11-26 14:46:22 +01:00
data |>
purrr::pluck("meta") |>
create_instrument_meta(record.id = FALSE)
}
}