# prepare path to example export
export_location <- system.file("extdata", "sT_exports", "snames",
"s_export_CSV-xls_CTU05_short_ref_miss_en_utf8.zip",
package = "secuTrialR")
# load all export data
sT_export <- read_secuTrial(data_dir = export_location)
# get form status
form_status_counts(sT_export)
Run the code above in your browser using DataLab