transfer from old repo

src/redcap_write_test.R

@@ -0,0 +1,18 @@
+## 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