andreas/REDCapCAST
1
0
Fork 0
mirror of https://github.com/agdamsbo/REDCapCAST.git synced 2026-06-19 13:17:30 +02:00
Code Issues Projects Releases Packages Wiki Activity

a new helper function has been introduced to help matching form names when special characters are in use.

Browse source
This commit is contained in:
AG Damsbo 2023-04-14 11:46:09 +02:00
commit 563c864091
3 changed files with 25 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

5
R/read_redcap_tables.R
View file

@ -76,8 +76,7 @@ read_redcap_tables <- function(uri,
# Removes any extra characters other than a-z, 0-9 and "_", to mimic raw
# instrument names.
if ("redcap_repeat_instrument" %in% names(d)) {
d$redcap_repeat_instrument <-
gsub("[^a-z0-9_]", "", gsub(" ", "_", tolower(d$redcap_repeat_instrument)))
d$redcap_repeat_instrument <- clean_redcap_name(d$redcap_repeat_instrument)
}
# Getting metadata
@ -93,7 +92,7 @@ read_redcap_tables <- function(uri,
l <- REDCap_split(d,
m,
forms = split_forms,
primary_table_name = "nonrepeating")
primary_table_name = "")
# Sanitizing split list by removing completely empty rows apart from colnames
# in "generics"