mirror of
https://github.com/agdamsbo/REDCapCAST.git
synced 2024-11-24 22:11:55 +01:00
12 lines
303 B
R
12 lines
303 B
R
mtcars_redcap <- mtcars |>
|
|
dplyr::mutate(
|
|
record_id = seq_len(dplyr::n()),
|
|
name = rownames(mtcars)
|
|
) |>
|
|
dplyr::select(record_id, dplyr::everything())
|
|
|
|
mtcars_redcap |>
|
|
write.csv(here::here("data/mtcars_redcap.csv"), row.names = FALSE)
|
|
|
|
usethis::use_data(mtcars_redcap, overwrite = TRUE)
|