17 lines
396 B
R
17 lines
396 B
R
library(formr)
|
|
source("../apikey.R")
|
|
formr_api_authenticate(host = "https://diagnostik.karneboge.de/api", verbose = F)
|
|
|
|
daten_dsf=formr_api_results(
|
|
run_name = "Schmerzfragebogen",
|
|
c("dsf1","dsf2"),
|
|
compute_scales = FALSE,
|
|
join = TRUE,
|
|
remove_test_sessions = TRUE,
|
|
verbose = FALSE
|
|
)
|
|
names(daten_dsf) <- gsub("_dsf1$|_dsf2$", "", names(daten_dsf))
|
|
|
|
|
|
|
|
formr_api_logout(verbose = FALSE)
|