if (FALSE) {
a <- amber.login("https://amber-demo.obiba.org")
# Find all interviews
amber.interviews(a)
# Find all interviews in a range of time
amber.interviews(a, from = "2022-01-12 00:00", to = "2022-02-13")
# Find all interviews for a specific participant/patient study identifier
amber.interviews(a, identifier = "1231")
# Find all interviews having their identifier matching a regular expression
amber.interviews(a, query = list(`data._id[$search]` = "^12"))
# Find all interviews which form data is equal to some value
# (will not work if the data are encrypted in the database)
amber.interviews(a, query = list(data.PATIENT.ORIGIN_REGION = "xyz"))
# Find interview records of a study
amber.interviews(a, study = "Trauma Registry")
amber.logout(a)
}
Run the code above in your browser using DataLab