knitr::opts_chunk$set(echo = TRUE)
library(esr.redcap.user.ui) library(here)
database <- here("UserUiTest","db_test.sqlite3") database <- here("UserUiTest","users.db") user1 <- create_user( username = "pdupont", password = "MyP@a55w0rd!", redcap_key = "E275C0A5476B0812BE2D4C0FF9450D50", database = database ) user2 <- create_user( username = "lrivas", password = "MyP@a55w0rd!", redcap_key = paste(rep("A", 32), collapse = ""), database = database )
get_all_users(database)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.