reflects changes to sanitize_split()

This commit is contained in:
Andreas Gammelgaard Damsbo 2024-02-06 14:01:41 +01:00
parent 289f57ab76
commit 3e356004d4
2 changed files with 3 additions and 6 deletions

View File

@ -92,15 +92,13 @@ read_redcap_tables <- function(uri,
# Splitting # Splitting
l <- REDCap_split(d, out <- REDCap_split(d,
m, m,
forms = split_forms, forms = split_forms,
primary_table_name = "" primary_table_name = ""
) )
# Sanitizing split list by removing completely empty rows apart from colnames sanitize_split(out)
# in "generics"
sanitize_split(l, c(names(d)[1], generics))
} }

View File

@ -12,8 +12,7 @@ read_redcap_tables(
events = NULL, events = NULL,
forms = NULL, forms = NULL,
raw_or_label = "label", raw_or_label = "label",
split_forms = "all", split_forms = "all"
generics = c("redcap_event_name", "redcap_repeat_instrument", "redcap_repeat_instance")
) )
} }
\arguments{ \arguments{