Nothing
## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#"
)
## ----setup--------------------------------------------------------------------
library(tidyREDCap)
## -----------------------------------------------------------------------------
redcap <- readRDS(file = "./redcap.rds")
redcap$ingredients___1
## -----------------------------------------------------------------------------
table(redcap$ingredients___1)
## ----example_raw--------------------------------------------------------------
make_choose_one_table(redcap$ingredients___1)
## ----example_pretty, results="asis"-------------------------------------------
make_choose_one_table(redcap$ingredients___1) %>%
knitr::kable()
## ----example2, results="asis"-------------------------------------------------
make_choose_one_table(
redcap$ingredients___2,
subset = TRUE
) %>%
knitr::kable()
## ----example3, results="asis", fig.align="left"------------------------------
redcap %>%
make_choose_one_table(ingredients___3) %>%
knitr::kable()
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.