atri_study_data: Read ATRI study data

Description Usage Arguments Value See Also Examples

View source: R/atri_study_data.R

Description

Read ATRI study data

Usage

1
atri_study_data(protocol, data, datalake = TRUE)

Arguments

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>).

Value

A data.frame of the study data.

See Also

atri_api

Examples

 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)

rg08705/test documentation built on Feb. 14, 2022, 3:07 a.m.