From 3e356004d4794bd72eb340fbd56e52d9b949f46b Mon Sep 17 00:00:00 2001 From: Andreas Gammelgaard Damsbo Date: Tue, 6 Feb 2024 14:01:41 +0100 Subject: [PATCH] reflects changes to sanitize_split() --- R/read_redcap_tables.R | 6 ++---- man/read_redcap_tables.Rd | 3 +-- 2 files changed, 3 insertions(+), 6 deletions(-) diff --git a/R/read_redcap_tables.R b/R/read_redcap_tables.R index b28909a..9f80194 100644 --- a/R/read_redcap_tables.R +++ b/R/read_redcap_tables.R @@ -92,15 +92,13 @@ read_redcap_tables <- function(uri, # Splitting - l <- REDCap_split(d, + out <- REDCap_split(d, m, forms = split_forms, primary_table_name = "" ) - # Sanitizing split list by removing completely empty rows apart from colnames - # in "generics" - sanitize_split(l, c(names(d)[1], generics)) + sanitize_split(out) } diff --git a/man/read_redcap_tables.Rd b/man/read_redcap_tables.Rd index f735f3a..e97c4c1 100644 --- a/man/read_redcap_tables.Rd +++ b/man/read_redcap_tables.Rd @@ -12,8 +12,7 @@ read_redcap_tables( events = NULL, forms = NULL, raw_or_label = "label", - split_forms = "all", - generics = c("redcap_event_name", "redcap_repeat_instrument", "redcap_repeat_instance") + split_forms = "all" ) } \arguments{