19 lines
464 B
R
19 lines
464 B
R
## REDCap write testing
|
|
|
|
# Is it possible to write just a single line without
|
|
|
|
|
|
library(REDCapR)
|
|
library(dplyr)
|
|
uri <- "https://bbmc.ouhsc.edu/redcap/api/"
|
|
token <- "9A81268476645C4E5F03428B8AC3AA7B" # `UnitTestPhiFree` user and simple project (pid 153)
|
|
|
|
|
|
dta <- redcap_read_oneshot(
|
|
redcap_uri = uri,
|
|
token = token,
|
|
raw_or_label = "raw"
|
|
)$data %>% select(c("age","sex")) %>% mutate(sex=1)
|
|
|
|
sts<-redcap_write_oneshot(dta,uri,token) ## No access
|