Description Usage Arguments Value See Also Examples
View source: R/atri_study_data.R
Read ATRI study data
1 | atri_study_data(protocol, data, datalake = TRUE)
|
protocol |
The protocol name (e.g. 'a345-test-1'). |
data |
The study data source name. See below for examples for each data source. Additionally, allowable text input can be the data export label (e.g.'Participant list'), the relative public api pathway (e.g. '/subjects'), or the data lake filename (e.g. 'participant_list.csv' or 'participant_list'). |
datalake |
default is TRUE, which returns data from the latest data extract from the data lake s3 archive topic. With datalake=FALSE, returns the current data using the public API (/public/api/v1/<relative API path>). |
A data.frame of the study data.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 | #--Participant data--#
#Participant list
subjects<-atri_study_data(protocol="a345-test-1",data="subjects")
#Participant Attribute Value list
subject_attr<-atri_study_data(protocol="a345-test-1",data="subject_attr")
#Participant Attribute Datadic list
subject_attr_dd<-atri_study_data(protocol="a345-test-1",data="subject_attr_dd")
#--Site data--#
#Site list
sites<-atri_study_data("a345-test-1","sites")
#Site Attribute Value list
site_attr<-atri_study_data("a345-test-1","site_attr")
#Site Attribute Datadic list
site_attr_dd<-atri_study_data("a345-test-1","site_attr_dd")
#--Study attribute data--#
#Study Attribute Datadic list
study_attr_dd<-atri_study_data("a345-test-1","study_attr_dd")
#--CRF metadata--#
#eCRF list
crfs<-atri_study_data("a345-test-1","crfs")
#Monitor Review list
monitor_review<-atri_study_data("a345-test-1","monitor_review")
#Form Lock list
form_lock<-atri_study_data("a345-test-1","form_lock")
#--Event/Schedule of events data--#
#Event list
events<-atri_study_data("a345-test-1","events")
#Event Attribute Datadic list
event_attr_dd<-atri_study_data("a345-test-1","event_attr_dd")
#Schedule of Events
tracks<-atri_study_data("a345-test-1","tracks")
#Subject Track list
subject_track<-atri_study_data("a345-test-1","subject_track")
#--Schedule of events by track code--#
#If datalake=TRUE, must use datalake filelabel or filename
soe_a3_default<-atri_study_data("a345-test-1","schedule_of_events_a3_default")
soe_a4_default<-atri_study_data("a345-test-1","schedule_of_events_a4_default.csv")
#If datalake=FALSE, must use API relative path
soe_a3_default<-atri_study_data("a345-test-1","/tracks/a3_default")
#--Alternate examples for 'data' parameter input--#
#Data export label
subject_track.1<-atri_study_data("a345-test-1",data="Subject Track list")
#Relative API path
subject_track.2<-atri_study_data("a345-test-1",data="/subject/track/list")
#Data lake filename
subject_track.3<-atri_study_data("a345-test-1",data="subject_track_list.csv")
subject_track.4<-atri_study_data("a345-test-1",data="subject_track_list")
#--Live data pull--#
subject_track_live<-atri_study_data("a345-test-1","subject_track", datalake=F)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.